Originally Posted by Pragma

The problem is that the "EOF" statement shouldn't be indented. Perl expects it to be at the absolute start of the line - otherwise it treats the line as text to be printed. Remove the space in front of it and it should work.