| line |
!l |
l&&!r |
l&&r |
condition |
|
854
|
14 |
0 |
16 |
defined $_[0] and ref $_[0] eq 'HASH' |
|
1123
|
15 |
4 |
0 |
ref $e and do {
local $@;
local $SIG{'__DIE__'};
eval {
do {
$e->isa('Exception::Base')
}
}
} |
|
1260
|
16 |
12 |
0 |
not ref $val and $val =~ /^[+-]?\d+$/ |
|
1263
|
0 |
0 |
0 |
not ref $arrval and $arrval =~ /^[+-]?\d+$/ |
|
1321
|
28 |
16 |
17 |
not ref $val and $val =~ /^[+-]?\d+$/ |
|
1380
|
5 |
1 |
6 |
exists $self->{$key} and defined $self->{$key} |
|
1543
|
0 |
0 |
31 |
defined $c{'file'} && $c{'file'} ne '' |
|
1552
|
2 |
0 |
2 |
defined $c{'file'} && $c{'file'} ne '' |
|
1562
|
20 |
4 |
0 |
$verbosity == 3 and $self->_skip_ignored_package($c{'package'}) |
|
1569
|
8 |
11 |
5 |
$verbosity <= 3 and $self->_skip_ignored_package($package) |
|
1570
|
0 |
0 |
19 |
defined $file && $file ne '' |
|
1677
|
0 |
0 |
62 |
$verbosity == 2 and not $self->_skip_ignored_package($stacktrace_element[0]) |
|
1701
|
0 |
40 |
0 |
defined $_ and ref $_ eq 'Regexp' && $package =~ /$_/ || ref $_ ne 'Regexp' && $package eq $_ |
|
1730
|
0 |
22 |
138 |
defined $self->{'caller_stack'} and defined $self->{'caller_stack'}[$i] |
|
1744
|
1 |
48 |
25 |
$max_arg_nums > 0 and $#args + 1 > $max_arg_nums |
|
1819
|
19 |
284 |
66 |
$max > 2 and $max < length $str |
|
2007
|
0 |
0 |
4 |
defined $version and $version =~ /^\d/ |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
946
|
1 |
71 |
0 |
ref $self || $self |
|
1027
|
2 |
34 |
0 |
ref $self || $self |
|
1107
|
0 |
18 |
1 |
ref $self || $self |
|
1236
|
8 |
8 |
36 |
ref $that eq 'Regexp' or ref $that eq 'CODE' |
|
|
16 |
8 |
28 |
ref $that eq 'Regexp' or ref $that eq 'CODE' or not defined $that |
|
1615
|
26 |
85 |
1 |
ref $_ or $_ ne '' |
|
1701
|
7 |
0 |
33 |
ref $_ eq 'Regexp' && $package =~ /$_/ || ref $_ ne 'Regexp' && $package eq $_ |
|
1787
|
13 |
9 |
303 |
do {
local $@;
local $SIG{'__DIE__'};
eval {
do {
$arg->isa('Exception::Base')
}
}
} or ref $arg |
|
1799
|
303 |
0 |
0 |
not defined *utf8::is_utf{'CODE'} or utf8::is_utf8($arg) |
|
1831
|
0 |
21 |
0 |
ref $self || $self |
|
1849
|
5 |
0 |
2 |
ref $old eq 'ARRAY' or ref $value eq 'Regexp' |
|
1866
|
4 |
0 |
2 |
ref $old eq 'ARRAY' or ref $value eq 'Regexp' |
|
1916
|
0 |
20 |
0 |
ref $self || $self |
|
1966
|
0 |
1 |
0 |
ref $self || $self |
|
2070
|
2 |
0 |
10 |
$attribute =~ /^(isa|version|has)$/ or $isa->can($attribute) |
|
2081
|
3 |
0 |
1 |
exists $attributes->{$attribute}{'default'} or exists $overridden_attributes{$attribute} |