rm_multi_line.pl
#!/usr/bin/perl
open my $oldfile,"<",$ARGV[0];
open(OUT,">./new1");
while (<$oldfile>) {
unless( $_ =~ /a|b|c/ ) {
print OUT "$_";
}
}Perl 腳本記錄3
最后編輯于 ：
?著作權歸作者所有,轉載或內容合作請聯(lián)系作者
- 文/潘曉璐 我一進店門忽媒，熙熙樓的掌柜王于貴愁眉苦臉地迎上來，“玉大人爷肝，你說我怎么就攤上這事猾浦。” “怎么了灯抛？”我有些...
- 正文 為了忘掉前任纵竖，我火速辦了婚禮漠烧，結果婚禮上杏愤，老公的妹妹穿的比我還像新娘。我一直安慰自己已脓，他們只是感情好珊楼，可當我...
- 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著度液，像睡著了一般厕宗。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上堕担，一...
- 文/蒼蘭香墨 我猛地睜開眼，長吁一口氣：“原來是場噩夢啊……” “哼剂碴！你這毒婦竟也來了把将？” 一聲冷哼從身側響起轻专，我...
- 正文 年R本政府宣布，位于F島的核電站洽洁，受9級特大地震影響痘系，放射性物質發(fā)生泄漏。R本人自食惡果不足惜饿自，卻給世界環(huán)境...
- 文/蒙蒙 一汰翠、第九天 我趴在偏房一處隱蔽的房頂上張望龄坪。 院中可真熱鬧，春花似錦复唤、人聲如沸健田。這莊子的主人今日做“春日...
- 文/蒼蘭香墨 我抬頭看了看天上的太陽抄课。三九已至，卻和暖如春雳旅，著一層夾襖步出監(jiān)牢的瞬間跟磨，已是汗流浹背。 一陣腳步聲響...
