The first Enter is actually making the program continue. But after returning, Perl seems to require two Enters for the <STDIN> in the main program to return.

I have no idea why this is so. I suspect it's a bug.