作者LiloHuang (相见不如怀念)
看板Programming
标题Re: 想请教一下 perl 中的字串取代
时间Sat Sep 22 00:52:39 2007
※ 引述《kornelius (Kornelius)》之铭言：
不晓得你是否可以以下面的测资达到跟我一样的输出
my $str = 'a/bcde/f'; # 原始字串
my $pattern = '^a\/(.*)'; # 比对样式
my $replace = 'c$1d'; # 取代字串
my $runtime = "\$str =~ s/$pattern/$replace/";
eval $runtime;
print $str;
也就是 output 为 cbcde/fd
你使用的 double eval 方式能够正确执行後面的 $replace 吗 @@"
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.230.172.181
1F：→ LiloHuang:另外我都是用Fedora跑的... 61.230.172.181 09/22 00:53
2F：→ LiloHuang:突然觉得原本的测资好像就有错...囧rz 61.230.172.181 09/22 00:56
※ 编辑: LiloHuang 来自: 61.230.172.181 (09/22 00:57)
3F：→ LiloHuang:刚刚把pattern打成patern了 现在output 61.230.172.181 09/22 00:57
4F：→ LiloHuang:已经改好了 还望说明~ 61.230.172.181 09/22 00:57
5F：→ LiloHuang:PS.现在的测资也是最先提问者要求的测资 61.230.172.181 09/22 00:59