Santa Hole 1 (head.pl) Post Mortem

We should call this "Piers' hole" :-).
In one of the most generous gestures in the history of golf,
he published his now infamous use.perl.org journal entry,
effectively giving the whole field the best solution.
But I will always remember this hole for his surreal:
#!perl -p
11..&

That said, Rick Delaney won the hole, finding Piers'
solution before Piers did. Eugene did that too.

*** Hole 1 (head.pl) ***
--- Zed Lopez ------------------------ 11
#!/usr/bin/perl -p
11..exit
--- Ala Qumsieh ---------------------- 11
#!perl -p
11..exit
--- Anthony J Breeds-Taurima --------- 11
#!/usr/bin/perl -p
11..exit
--- Jerome Quelin -------------------- 11
#!/usr/bin/perl -p
11..last
--- Jonathan E Paton ----------------- 11
#!/usr/bin/perl -p
11..exit
--- Csaba Raduly --------------------- 11
#!perl -p
11..last
--- Damian James --------------------- 11
#!/usr/bin/perl -p
11..last
--- Dave O'Neill --------------------- 11
#!/usr/bin/perl -p
11..exit
--- Eugene van der Pijll ------------- 11
#!/usr/bin/perl -p
11..exit
--- me-01@ton.iguana.be -------------- 11
#!/usr/bin/perl -p
11..exit
--- Karsten Sperling ----------------- 11
#!/usr/bin/perl -p
11..exit
--- Ian Boreham ---------------------- 11
#!/usr/bin/perl -p
11..exit
--- Japhy ---------------------------- 11
#!/usr/bin/perl -p
11..last
--- Piers Cawley --------------------- 11
#!perl -p
11..exit
--- Richard Proctor ------------------ 11
#!perl -p
11..exit
--- Rick Delaney --------------------- 11
#!/usr/bin/perl -p
11..last
--- Rick Klement --------------------- 11
#!/usr/bin/perl -p
11..last
--- Ronald J Kimball ----------------- 11
#!/usr/local/bin/perl -p
11..last
--- Scott Wessels -------------------- 11
#!perl -p
11..exit
--- Tim Ayers ------------------------ 11
#!/usr/bin/perl -p
11..exit
--- Tony Payne ----------------------- 11
#!/usr/bin/perl -p
11..exit
--- Aaron D Marasco ------------------ 12
#!/usr/bin/perl -p
11..exit;
--- Yanick --------------------------- 13
#!/usr/bin/perl -p
$_ x=$.<11
--- Evan A Zacks --------------------- 14
#!/usr/bin/perl -p
11..1&&exit
--- Ian Phillipps -------------------- 14
#!/usr/bin/perl -p
$.>10&&exit
--- Robin Houston -------------------- 14
#!/usr/bin/perl -p
$.>10&&exit
--- Keith C Ivey --------------------- 14
#! /usr/bin/perl -p
$.>10&&last
--- Mark Suter ----------------------- 14
#!/usr/bin/perl -p
$.>10&&exit
--- Simon Drabble -------------------- 14
#!/usr/bin/perl -p
$.>10&&exit
--- Michael G Schwern ---------------- 14
#!/usr/bin/perl -p
$.<11||exit
--- Michael Lambert ------------------ 14
#!/usr/bin/perl -p
$.>10&&exit
--- Vladi Belperchinov-Shabanski ----- 14
#!/usr/bin/perl -p
$.>10&&last
--- BooK ----------------------------- 14
#!/usr/bin/perl -p
11^$.||last
--- Brad Greenlee -------------------- 14
#!/usr/bin/perl -p
$.>10&&exit
--- Josh Shulz ----------------------- 16
#!/usr/bin/perl -p
exit if $.>10

--- anonymous ------------------------ 13
#!/usr/bin/perl -p
$_ x=$.<11
--- anonymous ------------------------ 14
#!/usr/local/bin/perl -p
$.<11||last
--- anonymous ------------------------ 14
#!/usr/bin/perl -p
$.>10&&last
--- anonymous ------------------------ 14
#!/usr/bin/perl -p
$.>9...exit
--- anonymous ------------------------ 15
#!perl -n
$.<11&&print
--- anonymous ------------------------ 16
#!/usr/bin/perl -p
exit if$.==11
--- anonymous ------------------------ 16
print@_[0..9]=<>
--- anonymous ------------------------ 16
#!/usr/bin/perl
print+(<>)[0..9]
--- anonymous ------------------------ 17
#!/usr/bin/perl -p
exit if($.>10)

• Santa Hole 1 (head.pl) Post Mortem by Andrew.Savige
• Re: Santa Hole 1 (head.pl) Post Mortem by aaron
• Re: Santa Hole 1 (head.pl) Post Mortem by Jeff 'japhy' Pinyan
• 1,000 anyone? by Bill Jones
• Re: 1,000 anyone? by Simon Drabble
• Re: Santa Hole 1 (head.pl) Post Mortem by Eugene van der Pijll