[問題] 如何修改一個資料夾中的所有檔案?

看板Perl作者 (烏鴉)時間18年前 (2007/05/04 18:52), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/4 (看更多)
我現在有一大堆資料檔案 每一筆檔案內容都是一長串座標,最下面兩列標示出這些座標中的最大與最小值 而且每個檔的總共列數都不一樣 檔案形式如下:125,160 126,161 140,150 ... ... xmax_288 xmin_7 ymax_170 ymin_7 現在我想要把每個檔案的最後兩列都砍掉然後存回原檔案 也就是把xmax,ymax這兩列砍掉 爬了文後發現有以下方法 open(F1,"<A"); open(F2,">B"); while(<F1>){ last if ($_ =~ m/xmax/); print F2 $_; } close(F1); close(F2); 但這方法只能自己指定要更改檔案的名稱,無法一次對資料夾中的所有檔案作更改 而且這方法並不是存到原檔案,而是存到一個新檔案 請問有人知道應該怎麼做的嗎? 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.118.155.163 ※ 編輯: CrowOnTorii 來自: 140.118.155.163 (05/04 18:53)
文章代碼(AID): #16En1QOp (Perl)
文章代碼(AID): #16En1QOp (Perl)