On Feb 15, Dave Hoover said:

>Nine players ended up with the winning 33 stroke solution, but Tim 
>submitted it first.  Unfortunately, this hole had a solution that 
>was not very golfish, but did reward those willing to dig through 
>some documentation on the core Perl modules.  Here is the winning 
>solution:
>
>#!perl -l
>use POSIX;print~~strtol pop,36

  -l -MPOSIX print~~strtol pop,36

Heh, that's 31.  Probably what John Krahn had (since he boasted a similar
method that cut out 2 chars).

-- 
Jeff "japhy" Pinyan      [EMAIL PROTECTED]      http://www.pobox.com/~japhy/
RPI Acacia brother #734   http://www.perlmonks.org/   http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
<stu> what does y/// stand for?  <tenderpuss> why, yansliterate of course.
[  I'm looking for programming work.  If you like my work, let me know.  ]

Reply via email to