欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页

神奇的Perl-正则表达式(4)

程序员文章站 2022-05-09 11:39:19
...

 

1.     替换

2 

3 

1、语法格式:
$字符串变量名=~s/<pattern>/<replacement/
<pattern>为需要替换的匹配模式串,<replacement>为替换的字符串。 把符合 <pattern>模式的字符串替换为 <replacement>
比如:将$myinfo字符串中的广东替换成北京。
$myinfo=~s/广东/北京/;
1、 示例:
1)    不使用匹配修饰符
#perl4-4.pl
my $mycity="广东湛江";
$mycity =~s/湛江/深圳/;#将湛江替换成深圳
print $mycity;
输出结果如下:
广东深圳
2)    使用匹配修饰符
#perl4-5.pl
#将字符串中深圳或湛江替换成广东
my $userlist="深圳刘发#上海李慧#北京张兵#湛江张济#湛江黄明";
$userlist =~s/湛江|深圳/广东/g;#将湛江和深圳替换成广东。
print $userlist;
运行结果如下:
广东刘发#上海李慧#北京张兵#广东张济#广东黄明
声明:本神奇的Perl系列为刘兴(http://deepfuture.iteye.com/)原创,未经笔者授权,任何人和机构不能转载