Clifford Hammerschmidt wrote: > We had a little competition at my work to come up with the shortest > (non-empty) perl script that could print itself. The winner (Jeff Anderson) > came up with: > > $_=q(print "\$_=q($_);eval");eval $_=q(print"\$_=q($_);eval");eval > Can anyone come up with a shorter one? -- Steve Lane <sml@zfx.com> ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe