Re^2: A little fun(?) with POD..

Try this on for (smaller) size. :)

$a||open(F, $0);
print/^=/?chr(ord('A')+($a++==5?0:($b=tr/ //c)==5?-33:$b)):()while<F>;
[download]

Makeshifts last the longest.

Comment on Re^2: A little fun(?) with POD.. Download Code

Replies are listed 'Best First'.
Re: Re^2: A little fun(?) with POD.. by one4k4 (Hermit) on Jun 18, 2003 at 16:18 UTC
I got nuttin back on win32. I still think it looks cool though. One4k4 - perlmonks@poorheart.com (www.poorheart.com)	[reply]