想請教一下 perl 中的字串取代
小弟剛接觸 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 的規則讀進來，
該如何做才能得到與第一種寫法一樣的結果呢？
希望各位先進能撥空稍微指點一下，感恩！ =)
--
╭╢師大資訊。白色情迷╟┬─ ⊙ Origin : snow.ice.ntnu.edu.tw
├╨→ 140.122.77.49←╜╰─ ☆ From : alg.csie.ntnu.edu.tw
討論串 (同標題文章)
以下文章回應了本文 (最舊先)：
完整討論串 (本文為第 1 之 12 篇)：
Programming 近期熱門文章
PTT數位生活區 即時熱門文章
