The error I make, over and over, is putting a semicolon where it doesn't belong.

sub foo ($$);
{   while  ($bar);
    {    $bar = 0;
         print << "HERE_DOC";
This doesn't print for some reason
HERE_DOC
    }
}
[download]

I'm finally starting to recognize the various errors this generates. At this rate I'll only need to repeat this error about a thousand more times.