| line |
true |
false |
branch |
|
64
|
0 |
108 |
if $attribute =~ /^_/ |
|
65
|
66 |
42 |
if $self->can($attribute) |
|
75
|
7 |
22 |
if @_ |
|
105
|
0 |
23 |
if keys %{$incoming;} |
|
107
|
0 |
23 |
unless $$args{'package'} |
|
109
|
11 |
12 |
unless $$args{'package'} =~ /\A$module_name_rx\z/o |
|
112
|
0 |
12 |
unless $$args{'profile'} =~ /\A$profile_name_rx\z/o |
|
119
|
0 |
12 |
unless $$args{$_} eq $orig |
|
130
|
0 |
12 |
unless (ref $$args{'extravars'} || '') eq 'HASH' |
|
133
|
0 |
12 |
unless (ref $$args{'localdirs'} || '') eq 'ARRAY' |
|
176
|
0 |
1 |
unless make_path($self->dist_name) |
|
222
|
0 |
0 |
if $$self{'_include_path'} |
|
233
|
2 |
11 |
unless ($$self{'_made_dist_dir'}) |
|
235
|
1 |
1 |
if -d $self->dist_name |
|
242
|
0 |
12 |
unless $args{'template'} |
|
245
|
1 |
11 |
if ($args{'template'} =~ /^Module\.pm$/) { } |
|
267
|
0 |
12 |
unless $t->process($args{'template'}, $vars, $outfile) |
|
279
|
0 |
6 |
unless -d $dir |
|
281
|
0 |
6 |
unless opendir my $dh, $dir |
|
286
|
6 |
0 |
$dir =~ /^(?:\Q$std_dir\E)/ ? : |
|
289
|
12 |
28 |
if $fname =~ /^\.{1,2}\z/ |
|
297
|
0 |
28 |
if -l $fpath |
|
299
|
4 |
24 |
if (-d $fpath) |
|
300
|
0 |
4 |
if ($$self{'nosubs'}) |
|
305
|
0 |
4 |
$subdir ? : |
|
323
|
0 |
24 |
unless -f $fpath |
|
325
|
10 |
14 |
$subdir ? : |
|
327
|
24 |
0 |
unless $$self{'_templates'}{$template} |
|
345
|
1 |
3 |
if @_ |
|
350
|
0 |
3 |
wantarray ? : |
|
357
|
1 |
18 |
if @_ |
|
361
|
15 |
3 |
wantarray ? : |
|
368
|
1 |
15 |
if @_ |
|
376
|
15 |
0 |
if -d $profile_dir |
|
379
|
0 |
15 |
wantarray ? : |
|
385
|
1 |
22 |
if @_ |
|
397
|
21 |
0 |
-d $dir ? : |
|
404
|
1 |
1 |
if @_ |
|
408
|
4 |
9 |
if /^_/ |
|
415
|
0 |
1 |
wantarray ? : |
|
422
|
1 |
34 |
if @_ |
|
434
|
1 |
28 |
if @_ |
|
444
|
1 |
13 |
if @_ |
|
458
|
0 |
13 |
wantarray ? : |
|
479
|
1 |
0 |
if (not -f catfile($self->dist_name, 'MANIFEST')) |