Re: PGA Golf, Round 1

[jorg]

right let's kick things off here... Here is my first Hole, 25chars, took me approx 25 minutes. Makes me wonder if i should've used a Wood number 3 rather than the Iron number 5

sub a{($_[0]=~/\w+/g)[4]}

Update mincus pointed out to me that there are only 18 chars i should count. How's that for a caddy !

Jorg

"Do or do not, there is no try" -- Yoda

[danger]

According to the counting rules (rule 1 above) you only count the characters inside the subroutine block (for one liners you count the whole command line). So yours is 18 chars.

Not to spoil anyone's fun, but here's a small tip for shaving characters --- use pop rather than $_[0], that gives us a 16 character solution:

sub S {(pop=~/\w+/g)[4]}
       123456789_123456   # 16