in reply to The Perl Review


25 chars.

I wasn't going to post this since it uses a module but I guess that someone should.

sub base36 { #23456789_123456789_12345 (25) use POSIX;0+strtol+pop,36 }

--
John.