| line |
true |
false |
branch |
|
19
|
0 |
0 |
unless $options->{'module'} |
|
|
0 |
0 |
unless eval {
do {
1 unless $options->{'module'}
}
} |
|
39
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
50
|
0 |
0 |
if $options->{'email'} and $options->{'email'} =~ /^(.*)\@cpan.org$/i |
|
52
|
0 |
0 |
if $vars->{'author.cpanid'} |
|
55
|
0 |
0 |
if (-d $dir) |
|
60
|
0 |
0 |
unless $_ |
|
71
|
0 |
0 |
if (-d "$cfg$tpldir") |
|
74
|
0 |
0 |
if $files |
|
79
|
0 |
0 |
unless ($files) |
|
80
|
0 |
0 |
unless ($options->{'template'} eq 'default') |
|
89
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
96
|
0 |
0 |
if ($file =~ /^(.*)_Module.pm$/) { } |
|
|
0 |
0 |
elsif ($file =~ /^(.*)_Module.spec$/) { } |
|
112
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
122
|
0 |
0 |
unless chdir $dir |
|
127
|
0 |
0 |
unless open my $fd, '>', $target |
|
130
|
0 |
0 |
unless close $fd |
|
133
|
0 |
0 |
if $options->{'verbose'} |
|
142
|
0 |
0 |
if (-d '.git') |
|
154
|
0 |
0 |
unless $dir =~ m[/$] |
|
158
|
0 |
0 |
if length $_ < $dl |
|
160
|
0 |
0 |
if (-d $_) |
|
164
|
0 |
0 |
unless -f $_ |
|
165
|
0 |
0 |
if /~$/ |
|
168
|
0 |
0 |
unless open my $fd, '<', $_ |