1

我有一个带有一些文本的文件in.txt 。
我在 Windows 上使用 IIS 7 本地服务器。并且isapiModule对 perl 工作正常。
当我通过浏览器运行这个 perl 代码时，它打印到浏览器只是打印行（不是数据）但不写入文件out.txt并且只是打开空文件out.txt （即无法通过浏览器写入）。
我的 wwwroot 文件夹对所有用户具有完全控制访问权限。

html代码： 

<html>
<body>

<form name="form1" action="perl.pl" method="post"
enctype="multipart/form-data">
<input type="submit" name="submit" value="Submit">
</form>

</body>
</html>

perl.pl： 

open(file,"<in.txt");
@x=<file>;
open(OUT,">out.txt");
print"print to browser...";
print OUT"@x\n";#for printing to file
close file;
close OUT;

可能是什么原因和解决方法。

更新：通过命令驱动器手动运行时程序正在写入。

4

1 回答 1

0

你有没有尝试过这样的事情？

#!/usr/bin/perl -w
use strict; 


my $in = 'in.txt';
open my $file, '<', $in or die "Can't open $in\n";

my $outfile = 'out.txt';
open my $outprint, '>', $outfile or die "Can't write to $outfile\n";


print "print to browser…\n";
while (<$file>) { 
    chomp;
    print $outprint "$_\n"; 
}
于 2013-08-23T09:09:57.590 回答