m??的问题

sjdy521

最近看perldoc里的m??，然后就亲自实验了下，发现个和理解不符的情况，故发出来看下：
按照perldoc里的例子，写在while或者foreach里，只会匹配一次，需要reset再能继续匹配，这个没什么问题

1. perl -le '$_="abc";for(0..3){print "match" if m?a*?}'

复制代码

输出：

1. match

复制代码

但是，当我尝试不在循环里写的时候，比如：

1. perl -le '$_="abc";print "match" if m?a*?;print "match" if m?a*?;'

复制代码

输出：

1. match
   
2. match

复制代码

两次都mactch了。。这点理解不了，望大家指点下

cdtits

1. Web:~# perl -le '$_="abc";for(0..3){print "$_ match $1" if m?(a*)?;}'
   
2. 0 match
   
3. Web:~# perl -le '$_="abc";print "$_ match $1" if m?(a*)?; print "$_ match $1" if m?(a*)?;'
   
4. abc match a
   
5. abc match a
   
6. Web:~#

复制代码

zhlong8

不在循环不就执行不了第二次不就没区别了。下面那明明就是两个不一样的匹配各自保存自己的属性不是很正常吗?

如果这个理解有障碍的话那那个 flip flop 肯定也理解不了吧

sjdy521

回复 3# zhlong8


    主要是m///g受g选项和pos()的影响，理解的时候是类比的猜测了。再加上有reset()的存在，我以为这个是m??自己维持的某种状态，被大家这么一说，稍微清醒了些
    关于Range Operator的那个，我看perldoc上有这么一句：

Each ".." operator maintains its own boolean state, even across calls to a subroutine that contains it

我也再重新去理解理解，多做些测试看看

zhlong8

我还没用过，看文档它就是个带状态的m// 和 pos 之间没什么特别关系

朱亭亭

1. for (0..3) { ... } 中的 $_  是 0 1 2 3
a* 又是 a可有可无可多个
所以你的代码意义不明

2. for(0..3){print "match" if 'abc' =~ m?a?}   
结果只有一个 match

zhlong8

看楼上才发现我好像错过了什么

sjdy521

@朱亭亭@zhlong8 那个for(0..3)是举的不够好，这样写吧

1. perl -le 'for(0..3){$_="abc";print "match" if m?a*?}'

复制代码

不过问题还是可以表述清楚了