Re: 想請教一下 perl 中的字串取代

看板Programming作者時間18年前 (2007/09/21 02:01), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串5/12 (看更多)
※ 引述《LiloHuang.bbs@ptt.cc (相見不如懷念)》之銘言: > 非常簡單 只要使用 eval 就可以了 > #!/usr/bin/perl > my $str = 'a/bcde/f'; > my $pat = '^a\/(.*)'; > my $rep = 'c$1d'; # \1 建議寫成 $1 比較好 > my $runtime = "\$str =~ s/$pat/$rep/"; > eval $runtime; > print $str; 感謝幾位先進的幫忙,後來用 eval 才解決我的問題,感恩! =) 順道請問一下,為什麼寫成 $1 比較好呢? 先前看一些 regular expression 的文件,好像都是教用 \1 的形式, 知道原因的話,印象比較深刻,以後才改得過來。 ^^; -- ╭╢師大資訊白色情迷╟┬─ ⊙ Origin : snow.ice.ntnu.edu.tw ├╨→ 140.122.77.49←╜╰─ ☆ From : alg.csie.ntnu.edu.tw
文章代碼(AID): #16yhLV00 (Programming)
討論串 (同標題文章)
文章代碼(AID): #16yhLV00 (Programming)