Re: [問題] 請問刪除問題
: 一個A.txt檔內容為
: ~~~~~~~~~~~~~~~~~~~
: ~~~~~~~~~~~~~~~~~~~~
: ~~~~~~~~~~~~~~~~~~~~
: delete_delete
: ~~~~~~~~~~~~~~~~~~~~~
: ~~~~~~~~~~~~~~~~~~~~~
: 若要把 delete_delete行以後全刪掉寫入 B.txt
: open(file1,"<A.txt)
: open(file2,">B.txt)
while(<file1>){
last if ($_ =~ m/delete_delete/);
print file2 $_;
}
: close(file1);
: close(file2);
: 請問各位大大中間要怎麼寫 謝謝
這樣是所要的嗎?!
另外上面 open 後面要 ;
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 221.169.88.150
推
210.58.30.38 09/15, , 1F
210.58.30.38 09/15, 1F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章