Re: Are You a Perl Golf Addict?

[email protected] wrote:
> 

> My name is Michael and my score is 20.
> I haven't golfed in 12 hours.
> I am hoplessly addicted to Perl Golf.

Jasper  - 13
Michael - 20
Eugene  - 21
Mike T  - 28
Ton     - 28

Yes!!! I knew I'd win one of these damn competitions sooner or later!

Jasp
-- 
sub r{int rand$_[0]}$"="";@j=split//,"jaspanotherperlhacker";@a=a..z;sub
b{print"@{$r[$_[0]]}\n"}do{$l=$k==@j?0:1;$k=0;print`clear\n`;for$n(reverse
0..21){$r[$n][$_]=$n?$r[$n-1][$_]:r(9)<$l?$a[r(26)]:" "for(0..20)}for(0
...@j){$r[20][$_]=$j[$_]and$k++if$r[@j][$_]=~/\w/;b($_)if$_%21}($f="@{$r
[18]}@{$r[19]}")=~s/ //g;select($t,$y,$u,.05)}while($l||$f)