kinda japhy

This is really a (bad) japh with a poem in it. Or maybe a poem with a japh around it. (deep!)

seek DATA,-48,1;eval while <DATA>;
exit;
do $japh while not sleep, or die;
print "Just another Perl hacker,\n";
__DATA__
[download]

Comment on kinda japhy Download Code

Replies are listed 'Best First'.
Re: kinda japhy by ikegami (Patriarch) on Nov 10, 2006 at 16:29 UTC
It has to be `-48` to work on Windows (since lines are ended with CRLF instead of LF). You could actually use `-48` for unix too, since the leading "`;\n`" won't hurt anything.	[reply] [d/l] [select]
Re^2: kinda japhy by jagh (Monk) on Nov 10, 2006 at 20:52 UTC
Thanks. I didn't even think of that. Updated now.	[reply]