@output = qw/apple pear cherry/; # 你給出的那個寫法是不對的.

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

#從頭開始寫

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

最簡單的示例
#!/usr/bin/perl
open my $fh,">>","$file_name";
print $fh "需要寫入的內容";
close $fh;

perl的讀寫文件特簡單，就4句話足矣?，F在我把每句話給你解釋一下：
①、#!/usr/bin/perl　　　在命令行打which perl就出來了，是PERL的編譯器。
②、open (OUT,">>","文件的絕對路徑");　　#“>>”:在原文件上追加，“>”:每次都覆蓋文件內容
③、print OUT "需要寫入的內容";　#　5.10之前要用print，之后可以寫say.
④、close OUT ; # 關不關無所謂，你不關，它也會自動關閉。