http://qs321.pair.com?node_id=417338


in reply to Re: Perl Monks turns 5
in thread Perl Monks turns 5

Hah. When I saw it, I thought it was l33tsp34k.

C0m3 g3t y0ur p3r1 h31p 4t p3r1m0nk5.0rg

--Stevie-O
$"=$,,$_=q>|\p4<6 8p<M/_|<('=> .q>.<4-KI<l|2$<6%s!<qn#F<>;$, .=pack'N*',"@{[unpack'C*',$_] }"for split/</;$_=$,,y[A-Z a-z] {}cd;print lc