line |
true |
false |
branch |
20
|
1 |
12 |
unless defined $input |
24
|
2 |
10 |
unless length $input and $input =~ /\S/ |
27
|
6 |
4 |
unless defined $self->{'mode'} |
49
|
2 |
20 |
unless @_ |
52
|
2 |
18 |
unless defined $got |
53
|
0 |
18 |
unless length $got and $got =~ /\S/ |
55
|
10 |
8 |
if $self->{'negate'} |
64
|
2 |
41 |
unless $exists |
65
|
2 |
39 |
unless defined $got |
66
|
2 |
37 |
if ref $got |
67
|
2 |
35 |
unless length $got and $got =~ /\S/ |
77
|
3 |
0 |
$mode eq '>' ? : |
|
3 |
3 |
$mode eq '>=' ? : |
|
3 |
6 |
$mode eq '<=' ? : |
|
3 |
9 |
$mode eq '<' ? : |
|
0 |
12 |
$mode eq '!=' ? : |
|
23 |
12 |
$mode eq '==' ? : |
84
|
12 |
23 |
if $negate |
88
|
5 |
0 |
if ($warn =~ /numeric/) |