| line |
l |
!l |
condition |
|
380
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
437
|
0 |
1 |
$attrs->{'STRICT'} and last handler |
|
526
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
599
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
722
|
6 |
0 |
$attrs->{'STRICT'} and last handler |
|
773
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
859
|
24 |
0 |
$attrs->{'STRICT'} and last handler |
|
1090
|
56 |
0 |
$attrs->{'STRICT'} and last handler |
|
1136
|
20 |
0 |
$attrs->{'STRICT'} and last handler |
|
1187
|
1 |
0 |
$context eq 'BOOL' and $attrs->{'STRICT'} and last handler |
|
1238
|
32 |
1 |
$attrs->{'STRICT'} and last handler |
|
1297
|
12 |
1 |
$attrs->{'STRICT'} and last handler |
|
1382
|
0 |
1 |
$attrs->{'STRICT'} and last handler |
|
1432
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
1482
|
0 |
0 |
$attrs->{'STRICT'} and last handler |
|
1634
|
51 |
0 |
$attrs->{'STRICT'} and last handler |
| line |
!l |
l&&!r |
l&&r |
condition |
|
149
|
22 |
0 |
48 |
$package eq $orig_package and $prev_package eq $orig_package |
|
213
|
6 |
3 |
6 |
defined $next_arg && !ref($next_arg) && !exists $STD_NAME_FOR{$next_arg} |
|
318
|
0 |
0 |
18 |
@_ == 1 and $impl = tied $_[0] |
|
338
|
27 |
1 |
0 |
not defined wantarray and $impl->{'NVALUE'} |
|
397
|
0 |
0 |
0 |
not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'} |
|
616
|
0 |
0 |
0 |
not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'} |
|
677
|
0 |
3 |
0 |
defined $callers_context && ($context eq 'NONVOID' || !$callers_context) |
|
739
|
0 |
1 |
0 |
not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'} |
|
876
|
0 |
2 |
1 |
not $attrs->{'STRICT'} and my $handler = $attrs->{'ARRAYREF'} |
|
1001
|
0 |
0 |
0 |
ref $retval eq 'REF' and eval {
do {
${$retval;} == ${$self;}
}
} |
|
1187
|
21 |
1 |
0 |
$context eq 'BOOL' and $attrs->{'STRICT'} |
|
1259
|
15 |
0 |
0 |
ref $rv ne 'SCALAR' and ref $rv ne 'OBJ' |
|
1317
|
15 |
0 |
0 |
ref $rv ne 'ARRAY' and ref $rv ne 'OBJ' |
|
1403
|
15 |
0 |
0 |
ref $rv ne 'HASH' and ref $rv ne 'OBJ' |
|
1453
|
7 |
0 |
0 |
ref $rv ne 'CODE' and ref $rv ne 'OBJ' |
|
1503
|
7 |
0 |
0 |
ref $rv ne 'GLOB' and ref $rv ne 'OBJ' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
362
|
0 |
1 |
20 |
$attrs->{'want_pure_bool'} ||= Want::want('BOOL') |
|
380
|
2 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
437
|
0 |
0 |
1 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
494
|
0 |
0 |
141 |
$attrs->{'want_pure_bool'} ||= Want::want('BOOL') |
|
526
|
0 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
584
|
0 |
6 |
50 |
$attrs->{'want_pure_bool'} ||= Want::want('BOOL') |
|
599
|
6 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
706
|
0 |
0 |
135 |
$attrs->{'want_pure_bool'} ||= Want::want('BOOL') |
|
722
|
1 |
0 |
6 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
773
|
1 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
840
|
0 |
12 |
1113 |
$attrs->{'want_pure_bool'} ||= Want::want('BOOL') |
|
859
|
12 |
0 |
24 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1017
|
0 |
0 |
0 |
exists $attrs_ref->{'VOID'} or exists $attrs_ref->{'DEFAULT'} |
|
1025
|
0 |
0 |
0 |
eval {
do {
[&_internal_LIST(sub {
}
, $self)]
}
} // do {
chomp $@;
"<<>>"
} |
|
1090
|
39 |
0 |
56 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1136
|
30 |
0 |
20 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1187
|
35 |
0 |
22 |
my $handler = $attrs->{$context} or $context eq 'BOOL' and $attrs->{'STRICT'} and last handler |
|
1238
|
15 |
0 |
33 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1297
|
15 |
0 |
13 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1382
|
15 |
0 |
1 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1432
|
7 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1482
|
7 |
0 |
0 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |
|
1634
|
10 |
0 |
51 |
my $handler = $attrs->{$context} or $attrs->{'STRICT'} and last handler |