We don't bite newbies here... much | |
PerlMonks |
Re: Perl for all ages?by Ojosh!ro (Beadle) |
on Feb 10, 2007 at 17:02 UTC ( [id://599365]=note: print w/replies, xml ) | Need Help?? |
I don't think you're ever too old or too young. I'm 38, so that's a silverback?
my($s,$b,@c,@b)=qw(0 0 5C 5F 2F 20);while(int($s+.45)<2){$b[0].=chr(hex($c[int($s+.45)]));$b[1].=chr(hex($c[int($s+2.45)]));$s+=.55}while(1){print $b[$b];$b--;$b*=$b}#Fishnets
In Section
Meditations
|
|