Perl中=~ s/// 绑定 替换时遇到的问题，求高人，在线等

gungundamdam

看到一个例子是这样的
$chip = "4000b0";
$shortchip = $chip;
$shortchip =~ s/[^0-9].*//;

为啥结果print $shortchip的时候是4000

直接看书的时候.*是表示任何字符串 即将以数字开始的后面带任意字符串从$shortchip中去掉，为什么结果是4000?等待高人指点

cdtits

[^0-9].* 匹配的字符为 b0，将其删除，剩下的就是 4000

gungundamdam

多谢...我把^当成锚定了.

zhou20071801

^符号在[]里表示非，在你那例子就是不是数字的时候匹配。^不在[]里时表示匹配开头。回复 3# gungundamdam