Perl ，怎样把数组写入文件？

一个很简单的数组， @output = (apple, pear, cherry); 怎样写入文件 fruit.txt ?

2024年11月16日 02:37

有3个网友回答

网友（1）：

 open( my $fh, '>', 'fruit.out' ) or die $!;
 print $fh $_ for @output;

记得给好评哦亲O(∩_∩)O~

网友（2）：

@output = qw/apple pear cherry/; # 你给出的那个写法是不对的.

open F, ">fruit.txt" or die "$! Can't create file";
print F $_.$/ foreach @output;
close F;

网友（3）：

#从头开始写

open(FILE,">fruit.txt");
#文件结尾追加
open(FILE,">>fruit.txt");
print FILE "@arr";

Perl ， 怎样把数组写入文件？