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/perlopen 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 ; # 关不关无所谓，你不关，它也会自动关闭。