Question

所以我是编写脚本的新手，我目前正在使用Perl。我写了一个脚本，我需要它做的最后一件事是将输出附加到已存在的.txt文件中。我一直试图让一个简单的脚本工作，以查看我的语法是否正确并且它不起作用。建议？

#Appending.pl
#!/usr/bin/perl
use strict;
use warnings;

my $appending_test;


open(my $APPENDING, ">>$appending_test");
print $APPENDING "I am appending";

Answer 1

您没有为open（）指定文件名以打开...

#!/usr/bin/perl

use warnings;
use strict;

my $filename = 'output.txt';

open my $fh, '>>', $filename
  or die "Can't open the file $filename: $!";

print $fh "I am appending...\n";

仅作为旁注，打开文件的更惯用的方法是使用三arg打开，如果打开失败，则输出带有错误消息的语句，就像我在上面的代码片段中所做的那样。

附加到文件中

1 个答案: