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

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

2024-11-16 02:37:41

推荐回答（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 ， 怎样把数组写入文件？