in reply to Splicing and slicing

Geez, you guys...

perl -we 'print((split//,"\nechle etn sJutaohrPr akr") [map{splice @_, +@_/$^F,$^W}(@_=$%..$^F*$=/5)])'

--
Allolex