看板 Perl 關於我們 聯絡資訊
: &replacement = "//"; : open FILE, "a"; : open INPUT, ">b"; : while(<FILE>) : { if ( m/c\d{2,}/i ){ if( m/xxxx/ ){ # 對$_做處理 } } #略 : }; : close INPUT; : close FILE; 另外,如果原本程式碼中的&通通換成$, 才不會有runtime error po上之前忘記確認是不是可執行的程式碼嗎? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ※ 編輯: flu 來自: 36.234.217.251 (03/05 21:35) ※ 編輯: flu 來自: 36.234.216.227 (03/06 01:14)