fyy\great\jino\plde 我的perl脚本如下: open(FH,"newfile"); my line; my @FH; my @array=FH; print "@array\n"; foreach $line(<@array>)
確定! 回上一頁