请 教 ： 关 于 writing to a file 用 Perl for CGI# Programming - 葵花宝典
b*h
1 楼
这 是 我 的 CODE：
#!C:\perl\bin\perl.exe -wT
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
my $q = new CGI;
print $q->header;
print $q->start_html(-title=>'writing to a file');
open csv_file, "> /test.txt" or die "Could not open file$!";
print csv_file "It is a test!!!\n";
close csv_file;
print $q->end_html();
我 想 把 “It is a test!!!”写 到 Apache 的 DocumentRoot 下 一 个 叫 test.
txt 的文 件 里， 可 是 我 运 行 这 个 CODE 后， test.txt里 什 么 都 没 写 上
。 请 问 知 道 的 朋 友 这 是 为 什 么 ？ 我 如 何
#!C:\perl\bin\perl.exe -wT
use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
my $q = new CGI;
print $q->header;
print $q->start_html(-title=>'writing to a file');
open csv_file, "> /test.txt" or die "Could not open file$!";
print csv_file "It is a test!!!\n";
close csv_file;
print $q->end_html();
我 想 把 “It is a test!!!”写 到 Apache 的 DocumentRoot 下 一 个 叫 test.
txt 的文 件 里， 可 是 我 运 行 这 个 CODE 后， test.txt里 什 么 都 没 写 上
。 请 问 知 道 的 朋 友 这 是 为 什 么 ？ 我 如 何
