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

Question

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

Answer 1

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

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

Answer 2

#从头开始写

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

Answer 3

最简单的示例
#!/usr/bin/perl
open my $fh,">>","$file_name";
print $fh "需要写入的内容";
close $fh;

Answer 4

perl的读写文件特简单，就4句话足矣。现在我把每句话给你解释一下：
①、#!/usr/bin/perl　　　在命令行打which perl就出来了，是PERL的编译器。
②、open (OUT,">>","文件的绝对路径");　　#“>>”:在原文件上追加，“>”:每次都覆盖文件内容
③、print OUT "需要写入的内容";　#　5.10之前要用print，之后可以写say.
④、close OUT ; # 关不关无所谓，你不关，它也会自动关闭。