For use on a bumper sticker

[Veachian64]

use strict;
$/=q;rle Pa nwdo nyko uu'orye  ,tsoioh tc ldoaseer  tnoa cm yu ocya rf
+.I;;
for(0..34){$"=$_*-1;$,.=substr($/,$",1,'')}$"=substr($,,0,1,'');$,.=$"
+;print qq}$,$/};

[japhy]

My other car is a Schwartzian Transform.

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;