看板 [ Perl ]
討論串[問題] 精確比對
共 2 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#2
Re: [問題] 精確比對
推噓1(1推 0噓 2→)留言3則，0人參與, 最新作者salagadoola (南瓜)時間17年前 (2008/07/16 13:53), 編輯資訊
0
0
0
內容預覽:
if ($line =~ s/a1([^\d])/b1$1/g). 像這樣把後面接著其他數字的 pattern 排除掉如何？目前想到的寫法是像這樣：. my @arr; # 宣告一個陣列，目前它的大小為 0. $arr[10] = 0; # 現在這個陣列的大小是 11. @arr = map { 0
#1
[問題] 精確比對
推噓2(2推 0噓 1→)留言3則，0人參與, 最新作者DreamYEN (我本善良)時間17年前 (2008/07/15 20:41), 編輯資訊
0
0
0
內容預覽:
剛接觸perl不久，有些東西搞不太懂. 請問些很淺的問題. 假設有20個pattern a1 a2 a3 .. a20. 當我用一個while去做替換. while ($line = <>) {. if ($line =~ s/a1/b1/g). }. 這樣子做的話，會連 a11 ~ a19的 a1
(還有44個字)
首頁
上一頁
1
下一頁
尾頁