perl 5.8与5.10 差异很大吗？

lingtianfeng

新人起步，学习资料是[perl语言入门（第五版）]
但是试验用环境装的是perl5.8,发现书里面很多代码执行出来，其结果跟书上给的不一样。
例：正则表达式
    /\d/     :  匹配所有数字字符
    /^\d/   :  匹配所有非数字字符

但在perl5.8的环境下，执行出来的结果却是一样的。
换句话说，在5.8中^是没有用的吗？

yybmsrs

把你实验用的代码贴出来看看呢

lingtianfeng

my $f = "123";
if ($f = ~ /^\d/) #变量f中的值为非数字字符时输出“its matched”
    {print "its matched \n";}
else                    #变量f中的值为数字字符时，将变量f的值输出到屏幕
    {print "$f \n";}

上例的执行结果是：“its matched”

我想像的结果应该是将变量f的值打印出来

yybmsrs

书上哪里写了    /^\d/   :  匹配所有非数字字符  ？

sjdy521

/^\d/  这个是 “匹配任何字符串的开头接着一个字数” 的意思吧 匹配非数字不是[^\d] 或者\D 吗？

Osment

/[^\d]/ ,
注意 ^ 还是锚点呢。 要表示 非， 是有前提的。

lingtianfeng

谢谢大家
已解决，正如楼上所说，没有被[]包含起来的^是代表着头一个字符，新人，请大家多多包涵撒