Here's the above, but kicked up a little bit. I put it on three lines for *koff* readability....
I call this one "Fun with tr/// Part II: Around your Ass to Get to your Elbow". Just LOOKIT that line noise in line #2!
<code>$s='Lvtu Copuifs Rfsm Jbdlfs';
print "${\&t($s)}\n";
sub t{$x=shift;$x=~tr/[b-zB-Z]/[a-zA-Z]/;return($x)}</code>
|