Re: [問題] 同時開啟許多檔案
※ 引述《Keelungman (:3)》之銘言：
: ※ 引述《MistQ (Mr.Q)》之銘言：
: : 各位好，新手有個問題想請問
: : 我想要做到的是將某個檔案A的不同欄位分別存到不同的檔案A1,A2,A3..
: : 比如A內容是
: : a1 a2 a3 a4 a5
: : a1 a2 a3 a4 a5
: : ...
: : 處理後變成A1檔案內容都是a1 a1,A2檔案內容是a2 a2...,etc
: : perl開一個檔是 open ( OUT ,"> $a.txt");
: : 不知道怎麼同時開啟多個檔，然後針對欄位不同分別輸出？
不然這樣也可, filehandle array
@OUT=();
open(IN, "A");
for $i (1 .. 5){
open($OUT[$i-1], ">>A$i.txt");
}
while(<IN>){
chomp;
@data = split " ";
for $i (0 .. 4){
$filehandle = $OUT[$i];
print $filehandle "$data[$i] ";
}
}
--
站在學問的遼闊大海前
閃亮的波光令人炫目 踏下去時卻又感到冰冷深沉
衝浪手輕巧地靠在板上 手指劃過水面 漾起珠光
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.13.146
推
03/10 15:08, , 1F
03/10 15:08, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 3 之 3 篇)：
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
