Distilled Greatness

Dorthu        
0 Likes   0 Comments  perl

print map { tr/at/pl/r } grep { (ord) % 4 < 3 } sort split //, 'great';
created with codestagram