看板Programming
标 题Re: 想请教一下 perl 中的字串取代
发信站KKCITY (Wed Sep 19 06:12:58 2007)
转信站ptt!ctu-reader!ctu-peer!news.nctu!netnews.chu!Leo.mi.chu!zoonews.ee.nt
※ 引述《[email protected] ( )》之铭言：
> 小弟刚接触 perl，有点问题想麻烦各位先进帮忙解答一下：
> 我知道在 perl 中可以用 s/pattern/replacement/ 来取代字串，
> 若原始字串是 "a/bcde/f", 若在程式码中以 s/^a\/(.*)/c\1d/ 进行取代
> 结果会变成 "cbcde/fd"
> 但是若我想把 pattern 跟 replacement 放在变数里，
> 比方说
> $pat = "^a\/(.*)";
> $rep = "c\1d";
> 然後以 s/$pat/$rep/ 来进行取代的操作，
> 结果会得到 "c\1d"
> 因为我需要由档案中将 pattern 与 replacement 的规则读进来，
> 该如何做才能得到与第一种写法一样的结果呢？
> 希望各位先进能拨空稍微指点一下，感恩！ =)
这是正规表示式的问题了..
可以在google搜寻正规表示式可以找到不少资料喔
good luck!
--
HTML教学语法：
<a href="
http://www.gagameme.com">免费游戏</a>
<a href="
http://www.adsenseor.com">SEO</a>
<a href="
http://asset.tw">房地产</a>
--
┌─────◆ＫＫＣＩＴＹ◆─────┐ ＫＫ免/费/拨/接 ◤
│ bbs.kkcity.com.tw │▏电话(1)：449◤1999 电话(2)：4058-6000
└──《From:219.84.29.136
》──┘▏帐号：kkcity 密码：kkcity
--