For use on a bumper sticker

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}$,$/};
[download]

Comment on For use on a bumper sticker Download Code

Replies are listed 'Best First'.
Re: For use on a bumper sticker by japhy (Canon) on Jan 14, 2002 at 01:01 UTC
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:??;`	[reply]