develooper Front page | perl.fwp | Postings from November 2011

Rate my JAPH

Thread Next
From:
Salve J Nilsen
Date:
November 10, 2011 15:16
Subject:
Rate my JAPH
Message ID:
alpine.DEB.2.00.1111101512170.7942@microbel.pvv.ntnu.no

Wow, nice to se something happening on this list. :)

Would anyone like to rate my old JAPH below? (Don't know how to rate 
it, but maybe it can be fun to figure that out... ;)


- Salve (Oslo.pm)

-- 
#!/usr/bin/perl
sub AUTOLOAD{$AUTOLOAD=~/.*::(\d+)/;seek(DATA,$1,0);print#  Salve Joshua Nilsen
getc DATA}$"="'};&{'";@_=unpack("C*",unpack("u*",':4@,$'.#     <sjn@foo.no>
'2!--"5-(50P%$PL,!0X354UC-PP%/0\`'."\n"));eval "&{'@_'}";   __END__ is near! :)

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About