| line |
true |
false |
branch |
|
33
|
11 |
0 |
if (defined $uses) { } |
|
41
|
3 |
8 |
if ($$self{'readonly'} or $$self{'package_readonly'}) |
|
56
|
4 |
23 |
if (not grep({/$package/;} @{$$self{'use'};})) |
|
69
|
10 |
1 |
unless defined $details{'nowarnings'} |
|
70
|
10 |
1 |
unless defined $details{'nostrict'} |
|
72
|
0 |
11 |
if (defined $$self{'base_package'}) |
|
80
|
2 |
9 |
if defined $details{'readonly'} |
|
103
|
16 |
0 |
if defined $$self{'package_readonly'} |
|
105
|
2 |
14 |
if defined $$options{'readonly'} |
|
111
|
4 |
12 |
if ($readonly) { } |
|
130
|
0 |
11 |
unless open my $file, ">$filename" |
|
148
|
0 |
0 |
if (@$errors) |
|
176
|
0 |
11 |
if ($packages_created{$package}) |
|
187
|
0 |
11 |
unless (-d $outdir) |
|
196
|
10 |
1 |
if scalar @{$$self{'use'};} |
|
218
|
5 |
6 |
if ($@) { } |
|
222
|
0 |
6 |
if ($$options{'verbose'}) |
|
233
|
0 |
0 |
if (not $self->create($options)) |