Re: Rate my JAPH
Andrew Savige said:
print Just another Perl hacker,
A classic in the minimalist tradition, this work attempts admirably
to communicate it's raison d'être in ways that surely would shape
fashion for years to come. It's accessibility is only rivalled by
it sheer intentional force, showing us all that the simplest of
pretentionless doodles can be a force to reckon with. Remarkable!
:)
- Salve
--
#!/usr/bin/perl
sub AUTOLOAD{$AUTOLOAD=~/.*::(\d+)/;seek(DATA,$1,0);print# Salve Joshua Nilsen
getc DATA}$='};{';@_=unpack(C*,unpack(u*,':4@,$'.# s...@foo.no
'2!--5-(50P%$PL,!0X354UC-PP%/0\`'.\n));eval {'@_'}; __END__ is near! :)
Re: Rate my JAPH
I intentionally grabbed an early one of Randal's for that stone snippet, though it is old enough be may not even recognize it. It was crafted in 1990 and posted from an intel address. :-) Cheers, Jeff On Nov 24, 2011, at 7:25 PM, Andrew Savige wrote: This node: http://perlmonks.org/?node_id=412464 claims that the first JAPH was simply (note the punctuation): print Just another Perl hacker, This ancient JAPH was penned in 1988 by a Portland Oregon hacker, currently sobering up after his wild 50th birthday party. /-\ - Original Message - From: Jeff Yoak j...@yoak.com To: Randal L. Schwartz mer...@stonehenge.com Cc: fwp@perl.org Sent: Friday, 25 November 2011 7:41 AM Subject: Re: Rate my JAPH On Nov 24, 2011, at 3:57 AM, Randal L. Schwartz wrote: If there were points for earliest JAPH, I'd get an unfair advantage. :) I believe this fragment was discovered at an archeological site from the late paleolithic era from somewhere near Portland.
Re: Rate my JAPH
Jeff == Jeff Yoak j...@yoak.com writes: Jeff I intentionally grabbed an early one of Randal's for that stone Jeff snippet, though it is old enough be may not even recognize it. It Jeff was crafted in 1990 and posted from an intel address. :-) I do in fact recognize it... it split a string into a hash, then printed the hash elements by order. I think that's also the one that fails later, thanks to the randomization applied to hash key seeds now for security purposes. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 mer...@stonehenge.com URL:http://www.stonehenge.com/merlyn/ Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc. See http://methodsandmessages.posterous.com/ for Smalltalk discussion
