我正在尝试替换与以下模式匹配的字符串:
my $string ="+++details of candidate
++name of candidate
+age of candidate
+++idiot
+idi";
该字符串应替换为:
my $string ="hii
how
fine
hii
fine";
我怎样才能做到这一点?
maybe:
$string =~ s/(\++)([^\+\n]*)/(qw(fine how hii))[length($1)-1]/ge;
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)