
原始数据中有一部分是错误的:岳麓支行湖南省长沙市分行
我想把错误数据中分行和支行信息调换过来:湖南省长沙市分行岳路支行
但是数据中也有正确的:湖北省武汉市分行东湖支行
需求就是把所有“省名字”在中间位置的字符串,以省为分割点分割,形成如:岳路支行、湖南省长沙市分行,这样两个字符串,然后调换位置组成正确的字符串。
我能得到正确的省名字,但是现在在分割字符串的时候遇到了问题:
my ($str1,$str2) = split /[^(^湖南省)]|[^(^湖南)]/,'岳麓支行湖南省长沙市分行';
这样分出来的肯定不对。。。。。
小弟初学,望高手帮助!多谢!
use utf8;
1. my ($str1,$str2) = split /(?<=\w)湖南(?=\w)/, '岳麓支行湖南省长镇笑汪沙市分行';
2. '岳麓支御仔行湖南省长升慎沙市分行' =~ /^(.+)(湖南省)(.+)$/;
print $2$3$1;
这样就可以了袭则
$str="岳麓支行湖南省长早袭沙市分行"拍睁棚;
$str=~s/(.*支行)(.*省)(.*)/$2$3$1/;