| line |
true |
false |
branch |
|
16
|
0 |
44 |
unless (defined $curpkg) |
|
24
|
0 |
44 |
if not defined $classes or ref $classes ne 'ARRAY' |
|
27
|
18 |
26 |
if ($list_start->content eq 'parent') |
|
31
|
44 |
0 |
if defined $classes and ref $classes eq 'ARRAY' |
|
47
|
3 |
82 |
if defined $in_scheduled_block and $in_scheduled_block eq 'END' |
|
50
|
0 |
82 |
unless $statement->isa('PPI::Statement') |
|
53
|
0 |
82 |
unless $child |
|
56
|
45 |
37 |
if ($child->isa('PPI::Token::Word') and $child->content =~ /^(?:unshift|push)$/) { } |
|
|
21 |
16 |
elsif ($statement->isa('PPI::Statement::Variable')) { } |
|
|
16 |
0 |
elsif ($statement->content =~ /\@ISA\s*\)?\s*=/) { } |
|
61
|
21 |
0 |
if ($statement->type eq 'our' and $statement->variables and ($statement->variables)[0] eq '@ISA') |
|
88
|
0 |
45 |
unless (defined $curpkg) |
|
99
|
0 |
45 |
unless defined $arguments and @$arguments and $$arguments[0] eq '@ISA' |
|
104
|
26 |
19 |
if ($type eq 'push') { } |
|
|
19 |
0 |
elsif ($type eq 'unshift') { } |
|
105
|
3 |
23 |
$in_scheduled_block eq 'BEGIN' ? : |
|
108
|
0 |
19 |
$in_scheduled_block eq 'BEGIN' ? : |
|
126
|
0 |
37 |
unless (defined $curpkg) |
|
131
|
0 |
37 |
unless $child |
|
138
|
18 |
19 |
unless $child |
|
143
|
0 |
19 |
unless defined $arguments |
|
145
|
8 |
11 |
if ($in_scheduled_block and $in_scheduled_block ne 'END') { } |
|
|
11 |
0 |
elsif (not $in_scheduled_block) { } |