怎么不匹配字符串?

时间:2011-07-04 12:26:41

标签: perl

此脚本将打印aaa

我如何得到$b =~ /disabled/的否定值,当TRUE与“禁用”不匹配时,它会返回$b

IE中。我想保留if语句,但想要$b !=~ /disabled/

#!/usr/bin/perl

use warnings;
use strict;

my $a = 1;
my $b = "disabled";


if ($a == 1 && $b =~ /disabled/) {

    print "aaa\n";

}

4 个答案:

答案 0 :(得分:6)

我想要的是!~

if ($a == 1 && $b !~ /disabled/) {

   print "aaa\n";

}

答案 1 :(得分:2)

解。

if ($a == 1 && !($b =~ /disabled/)) {

答案 2 :(得分:1)

这样的东西?

if ($a == 1 && $b !~ /disabled/) {

答案 3 :(得分:1)

使用不匹配的运算符!~