[問題] 檔案複製
因為要在很多個檔案中挑出我需要的檔案,並且複製到另外一個資料夾,然後須要挑的
檔案在一個htm的檔案裡面有寫。
我利用一個array去選擇要挑的檔案,結果複製的檔案會一個有內容一個沒內容這樣交替
不知道錯誤在哪裡,可以麻煩板上高手指證一下嗎?謝謝
剛開始學perl,寫的有點亂,不知道有沒有比較簡潔一點的方法^^"
後來code改成這樣,但是還是會一個有抓到一個沒抓到這樣@@",不知道有沒有人能指導
一下,謝謝
use strict;
my @list;
my $txt;
open(L,'/Users/yanganto/Desktop/list.txt');
while(<L>){
$txt = $_;
chomp($txt);
@list = (@list,$txt);
}
my $i=0;
my $file;
for($i=0;$i<=413;$i++){
$file = glob("/Users/yanganto/Desktop/Minimization/$list[$i]/Output/*.msv");
system("cp $file /Users/yanganto/Desktop/5Cal/");
}
--
青春就像一隻奮力飛翔的候鳥
在穿越黑夜與白天的那一剎那
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.218.62
※ 編輯: yanganto 來自: 140.112.55.126 (04/20 13:04)
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章