在Perl中打开File方法

时间:2011-05-11 00:30:10

标签: perl file-io methods

我在下面的代码中测试了>>>的开放目标文件,它运行良好。他们有什么不同?

my $sourfile = "ch1.txt";
my $destfile = "chapter1.txt";

open (SOURFILE, $sourfile);
open (DESTFILE, ">>$destfile"); #both >> and > work here.

#my $fh = \*DATA;  
my $fh = \*SOURFILE;

3 个答案:

答案 0 :(得分:7)

区别:

>    Open file for writing.
>>   Open file for appending.

您可能希望切换到使用open的3参数形式,并将词法变量用作文件句柄:

open(my $handle, '>', "some_file") or die $!;

答案 1 :(得分:3)

提前道歉,但是open - perldoc。事实上,我会将我的答案概括为:始终先尝试http://perldoc.perl.org。论坛/ Q& A网站是您的最后度假胜地,而非第一个

答案 2 :(得分:1)

>创建或截断(如果已存在)。 >>创建或附加到现有文件。 (而且它不是一种方法;除非你眯眼,否则Perl 5并不是真正的OO。)