Windows调用Unix下的perl脚本

Windows调用Unix下的perl脚本
各位高手,小弟有礼了:
我有一个问题,我由Windows调用Unix下的perl脚本,在Unix脚本里要求由终端输入数据的,所以,在Windows终端里由我输入数据,但,当我输入数据后回车跟着敲的很快的话,终端就会死掉,而回车敲的慢的话就没有问题,不知道是什么原因,如何解决呢?代码如下:

[b]在Windows的脚本:[/b]

use warnings;

$host = "192.168.18.242";
system("rsh " . $host . " -l useraccount /export/home/Script/WindowsCallUnixKeyDataTest.pl");

[b]在Unix下的WindowsCallUnixKeyDataTest.pl脚本:[/b]

#!/usr/bin/perl

my $input = "";

$input = <STDIN>;

$input =~ s#\r##i; #过滤掉"\r"字符

chomp($input);
while($input !~ /\q/i)
{

print "Now you input : $input\n";

$input = <STDIN>;

$input =~ s#\r##i;

chomp($input);
}