develooper Front page | perl.fwp | Postings from February 2002

Re: TPR0 Final Results

Thread Previous | Thread Next
From:
John W. Krahn
Date:
February 15, 2002 14:43
Subject:
Re: TPR0 Final Results
Message ID:
3C6D8F23.637EEA1D@acm.org
Jeff 'Japhy' Pinyan wrote:
> 
> 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).

From the command line you can write it this way:

perl -MPOSIX -leprint~~strtol+pop,36

You don't need the quotes because there is no whitespace so you get 31
strokes.


John
-- 
use Perl;
program
fulfillment

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About