in reply to PGA Golf, Round 1

Round 1, 2 minutes 

sub h{pop=~/(?:\w+\W*){4}(\w+)/}

[download]

Round 2, 15 sec 

print STDERR"Can't find label TPC at -e line 5."

[download]

Round 3, 5 mins, Should probably use /s and \z but that's 2 extra chars 

sub f{pop=~/^(.*?)\1+$/}

[download]

Round 4, 6 mins performance level inversly proportional to level of red in bottle 

sub h{$_=pop;s/(..)/chr hex $1/eg;(/../g)}

[download]

Round 5, Back on form, 2 minutes 

sub g{$m=pop;map{$m=$_ if $_>$m}@_;$m}

[download]

Round6, Took too damn long! 

sub v{sort{eval'$a=~/([aeiou])/;$1'cmp eval'$b=~/([aeiou])/;$1'}@_}

[download]

Please sir can I have some more?

tachyon

Updated with corrections 29052001, and sadly all added length :-(

Replies are listed 'Best First'.
Re: Re: PGA Golf, Round 1
by chipmunk (Parson) on May 28, 2001 at 07:39 UTC
    I'm afraid that your solutions to 1, 3, 4, and 5 must be disqualified.

    Hole 1 specifies returning the fifth word; your solution returns some extra whitespace. Additionally, there may be no whitespace after the fifth word, or after any of the words: first-second!third+fourth*fifth.

    For Hole 3, the entire string must consist of the repeated substring. This was demonstrated in the examples, where 'ababab' results in 'ab' but 'ababaaa' results in ''.

    Hole 4 asks for a list of characters, rather than a string. Looks like that one tripped up a lot of people. :)

    Hole 5 features a common gotcha; a correct solution must handle the case where all the values in the list are negative. Another one that a lot of people don't catch. :)

    We tried to make things a little easier at the actual tournament by providing a test scaffold for each hole, which the participants could use to test their code on sample input. Solving these holes is much harder without that.

[reply]
[d/l]

In Section Meditations