perl 正则的问题

lostwolf

例如body="abcd";
如果字符串中有"c"则不匹配  要怎么写啊  弄了一上午也没弄出来 大家帮帮我啊
在实际问题里边 字符串中除了"c" 其他的字符都是任意数量的任意字符

liangandlin

不懂你说什么 “ 其他的字符都是任意数量的任意字符“
我刚学，我觉得正则表达式所有的条件都是判断匹配的。如果不匹配就if吧
$body="abcd"'
if($body =~ m/abcd/)
{
;
}
else
{
print " This means it doesn't match";
}
或许还有什么别的命令把。不知道，关注。

islue

if ( $body !~ /c/ ) {}

lostwolf

多谢 楼上的两位 不过我又有新的问题啦

$body!~/[^\[code\]]\[\/code\]*[^\[]/g;
这里的[^\[code\]]  是不为[或c或o或... 便匹配
怎样写才能让它 不为整个"[code]"  时 匹配

生来自由

楼上的你的逻辑有些混乱呀。

到底要匹配什么？