给perl文件使用重定向

Windows平台下:

文件名：test.pl

代码：

#!perl
system("dir");

?然后在命令行输入：
test.pl >1.txt

结果输出“磁盘空间不足”。

如何才能让perl文件支持重定向呢?

我发现只要在perl文件里先运行以下代码:

`cd`;

(当然cd命令可以换成其他命令.)

然后就可以重定向了.

即以下代码就可以支持test.pl >1.txt了.

#!perl

`cd`;
system("dir");

近日查到此是windows的bug。

看链接：

http://support.microsoft.com/kb/321788