[問題] 要加入的字串重覆了
最近開始學perl
Learning perl習題的ch9.no5.
寫一個程式在裡面加上版權宣告## copyright (C) by xx
一定要寫在開頭的#!perl的下一行
如果已經有版權宣告的檔案就不需再更動
以下是我寫的...
$in=$ARGV[0];
$^I=".bak";
while(<>){
if(/copyright (C) by me/i){
print "$_";
}
else {
if(/^#!/im){
$_ .= "## copyright (C) by xx\n";
}
print "$_";
}
}
可是如果檔案已經有版權宣告
他會再加上一個...
請問這是為什麼會這樣?好困惑
謝謝瞜
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.251.200.121
※ 編輯: cindy1120 來自: 111.251.200.121 (06/04 00:58)
推
06/04 02:20, , 1F
06/04 02:20, 1F
→
06/04 13:54, , 2F
06/04 13:54, 2F
→
06/04 13:54, , 3F
06/04 13:54, 3F
推
06/04 14:22, , 4F
06/04 14:22, 4F
討論串 (同標題文章)
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
10
113