Re: PGA Golf, Round 1

[btrott]

Hole 6.

This is really ugly and much too long, but whatever:

    sub hole{$r='([aeiou])';sort{($a=~$r)[0]cmp($b=~$r)[0]}@_}
             123456789_123456789_123456789_123456789_12345678

48 characters, I think.