active perl и STDIN

[grey_olli]

Из FAQ:
-----------------
STDIN and STDOUT, and Piping don't always work on NT.

You may get unexpected results when you try to redirect the output of files that use Windows NT's file association feature. You can use pl2exe or pl2bat to convert a Perl script to an executable or a batch file. This should solve any problems you may have with redirection.
----------------

У меня не работает запущенное в cmd или фаре перенаправление ввода вывода вида:
type file | test.pl
test.pl < file

Например:
C:\tmp\>test.pl < iphone.backup.utf8.txt
C:\tmp\>echo 1243 | test.pl
C:\tmp\>type test.pl
#!perl
#$tmp=readline(*STDIN);
while(<>) {
print $_;
}
C:\tmp\>

у меня XP, SP3 [Версия 5.1.2600] . При этом у некоторых в Win XP SP 1 этот же код работает.

Вопрос: как с этим бороться из active perl??

PS: perl, v5.10.1 built for MSWin32-x86-multi-thread
(with 2 registered patches, see perl -V for more detail)