The OP states in Re: The text preceding <STDIN> is not printed that it helped.

Perhaps he runs his Perl scripts from a special environment, e.g. an IDE, which tees the script's STDOUT, so that Perl doesn't recognize it as a terminal any more…