Now now now, before you --;, keep in mind I edjumakated myself quite a bit with this code. Actually, its a work in progress, as I'm playing with it when I get bored throught the day. Any TMTOWTDI's would definitally be appreciated. Any 'what were you thinking's would be as well, because, honestly, I wasnt thinking much. Just having fun.
#!/usr/bin/perl -w
use strict; foreach (qw(31267 31260 31258 31261 31305 31240 31239
31238 31261 31233 31244 31259 31305 31258 31242 31259 31232 31257
31261 31305 31234 31232 31245 31245 31232 31244)){$_ = $_^ 31337;
($_ = chr)=~ tr/stie/5713/; print;}print chr(10);
_14k4 -
webmaster@860.org (
www.poorheart.com)