关于perl匹配和智能匹配的问题
时间:2011-12-21
来源:互联网
今天晚上看到小羊驼的智能匹配这一章,遇到一个奇怪的问题,在这里请教大家。
当程序1为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
# print "I found you in the name!\n" if $name= ~ /you/;
输出结果为:
I found you in the name!
当程序2为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
#print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
输出结果为:
yes,I found you in the name!
I found you in the name!
当程序3为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
#print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
输出结果为:
yes,I found you in the name!
I found you in the name!
当程序4为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
输出结果为:
I found you in the name!
I found you in the name!
然后从上面三个程序测试的结果,我发现当程序先遇到绑定操作符时匹配时就不再匹配后面的智能匹配了。而当先遇到智能匹配匹配上后仍然匹配后面的绑定操作符时匹配。不过我不知道原因,在这里希望大家帮忙解决一下。
当程序1为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
# print "I found you in the name!\n" if $name= ~ /you/;
输出结果为:
I found you in the name!
当程序2为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
#print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
输出结果为:
yes,I found you in the name!
I found you in the name!
当程序3为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
#print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
输出结果为:
yes,I found you in the name!
I found you in the name!
当程序4为:
#!/usr/bin/perl -w
#use strict;
my $name="you are me";
$_=$name;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
print "I found you in the name!\n" if $name= ~ /you/;
print "yes,I found you in the name!\n" if $name ~~ /you/;
输出结果为:
I found you in the name!
I found you in the name!
然后从上面三个程序测试的结果,我发现当程序先遇到绑定操作符时匹配时就不再匹配后面的智能匹配了。而当先遇到智能匹配匹配上后仍然匹配后面的绑定操作符时匹配。不过我不知道原因,在这里希望大家帮忙解决一下。
作者: junjieguo 发布时间: 2011-12-21
问题要言简意赅。三行代码文字就能说清楚的问题,不要用50多行。这对读者的时间是一种浪费。
作者: iambic 发布时间: 2011-12-21
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28