| line |
true |
false |
branch |
|
18
|
0 |
0 |
unless $options->{'module'} |
|
|
0 |
0 |
unless eval {
do {
1 unless $options->{'module'}
}
} |
|
36
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
47
|
0 |
0 |
if $options->{'email'} and $options->{'email'} =~ /^(.*)\@cpan.org$/i |
|
49
|
0 |
0 |
if $vars->{'author.cpanid'} |
|
52
|
0 |
0 |
if (-d $dir) |
|
59
|
0 |
0 |
if (-d "$cfg$tpldir") |
|
62
|
0 |
0 |
if $files |
|
67
|
0 |
0 |
unless ($files) |
|
68
|
0 |
0 |
unless ($options->{'template'} eq 'default') |
|
77
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
84
|
0 |
0 |
if ($file =~ /^(.*)_Module.pm$/) |
|
94
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
104
|
0 |
0 |
unless chdir $dir |
|
109
|
0 |
0 |
unless open my $fd, '>', $target |
|
112
|
0 |
0 |
unless close $fd |
|
115
|
0 |
0 |
if $options->{'verbose'} |
|
124
|
0 |
0 |
if (-d '.git') |
|
136
|
0 |
0 |
unless $dir =~ m[/$] |
|
140
|
0 |
0 |
if length $_ < $dl |
|
142
|
0 |
0 |
if (-d $_) |
|
146
|
0 |
0 |
unless -f $_ |
|
147
|
0 |
0 |
if /~$/ |
|
150
|
0 |
0 |
unless open my $fd, '<', $_ |