Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

use Perl Log In

Log In

[ Create a new account ]

sneex (1634)

sneex
  (email not shown publicly)
http://jacksonville.pm.org/
Yahoo! ID: elohayelohim (Add User, Send Message)

My brain must be turning into pizza and beer... Hmmm, I have to think about this before I add a Bio... :/

Journal of sneex (1634)

Tuesday February 17, 2004
02:16 AM

Really Old Usenet postings...

[ #17453 ]

$perlRulez = "FCCJ Webmaster";
if ($perlRulez =~ /(F)(C)(C)(J)( )(W)(e)(b)(m)(a)(s)(t)(e)(r)/) {
        print "$4", chr(ord($12)+1), "$11$12$5", uc($10), chr(ord($9)+1),
                chr(ord($14)-3), "$12", lc(chr(ord($1)+2)), reverse($14,$13),
                "$5", uc(chr(ord($14)-2)), "$13$14", chr(ord($9)-1), "$5",
                uc(chr(ord($7)+3)), "$10", chr(ord($10)+2),chr(ord($9)-2),
                reverse($14,$13), "\n"; }

Saturday February 14, 2004
03:35 AM

2oo4

I'm back   =)

Been away too long...

-Sx-