develooper Front page | perl.golf | Postings from June 2002

re: mini golf

Thread Previous | Thread Next
From:
Eric Timme
Date:
June 30, 2002 12:19
Subject:
re: mini golf
Message ID:
000d01c2206a$3c5d87e0$0a00a8c0@rapture
didn't officially submit any, but here are my two 46s

#!perl -nl
$a[$_]++while$_--;END{print for reverse@a}

#!perl -nl
map$a[$_]++,1..$_;END{print while$_=pop@a}



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