> Just to save some of you experiementers some time, I'll share a failed
> attempt.  In hindsight, it's pretty obvious that it should fail, but I
> felt like trying it anyway:
> 
> perl -MCompress::Zlib -e'print compress"Just another Perl hacker,"'
> 
> yields a 33 byte "compressed" version of the string.  So, you'd need a
> program of length -1 to uncompress and print it.  Back to the drawing
> board...

Okay, here is an even less sucessful approach:

0         1         2         3     
012345678901234567890123456789012345

print`perldoc perlembed`=~/= (J.*)/m

---

A full version of that looks like:

`perldoc perlembed`=~/= (J.*)/m;$_=$1;y'AH'ah';print"$_,"

but that is hopelessly long.

Jonathan Paton

__________________________________________________
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com

Reply via email to