in reply to Re^2: ACA JAPHin thread ACA JAPH
<shameless plug>There's a number of tips and techniques listed in Perl Golf 101 as well as in the comments to that node.</shameless plug>
s**lil*; $*=join'',sort split q**; s;.*;grr; &&s+(.(.)).+$2$1+; $; =
qq-$_-;s,.*,ahc,;$,.=chop for split q,,,reverse;print for($,,$;,$*,$/)
Wow, that's a nice node that I wasn't previously aware of. The basic shortenings I made were:
.desrever si txet eritne ehT
.backwards are (letters the not but) words the Only
ehT sdrow era ni redro, tub eht srettel era eht rehto yaw.
Who ndees baacdkrws wehn you have Tceilmopgyya?
?wdors reeersvd up meixd about How
.tusnnmihep rof nuttolg a m'I
Results (438 votes). Check out past polls.