>>> For each space, parenthesis and semicolon in your solution, think
>>> carefully if they are needed. Or just try to remove them, and see if
>>> your solution still works.
>>
>> for(@names){print;last if/Dr /;}
>>
>> 32 strokes :)
>>
>> I get the feeling that people are laughing at my puny golfing skills :)
>
> We all were beginners once. We don't laugh (in public) at people who
> make elementary mistakes if they haven't gotten the chance to learn
> about them. We laugh at people who make elementary mistakes after they
> have been golfing for years.
>
> And we laugh at people who are told to CHECK FOR EVERY SEMICOLON IF IT
> CAN BE REMOVED, AND WHO THEN JUST LEAVE THEM IN!!!
[localhost:~/Programming/Perl/Various code] tor% cat golf
#!/usr/bin/perl
for(@names){print;last if/Dr /}
[localhost:~/Programming/Perl/Various code] tor% ./golf
[localhost:~/Programming/Perl/Various code] tor%
Hmm, I thought I checked that?
31 strokes :)
I'm off to apply this to my TPR0,3 code :)
Tor