在perl中用foreach输出@array到文件

例子

foreach my $f (@allfiles) {
chomp $f;
        print FOUT "$f\n";
}

你可能感兴趣的:(在perl中用foreach输出@array到文件)