| line |
true |
false |
branch |
|
18
|
0 |
0 |
unless $options->{'module'} |
|
|
0 |
0 |
unless eval {
do {
1 unless $options->{'module'}
}
} |
|
37
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
48
|
0 |
0 |
if $options->{'email'} and $options->{'email'} =~ /^(.*)\@cpan.org$/i |
|
50
|
0 |
0 |
if $vars->{'author.cpanid'} |
|
53
|
0 |
0 |
if (-d $dir) |
|
60
|
0 |
0 |
if (-d "$cfg$tpldir") |
|
63
|
0 |
0 |
if $files |
|
68
|
0 |
0 |
unless ($files) |
|
69
|
0 |
0 |
unless ($options->{'template'} eq 'default') |
|
78
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
85
|
0 |
0 |
if ($file =~ /^(.*)_Module.pm$/) |
|
95
|
0 |
0 |
if ($options->{'install-templates'}) { } |
|
105
|
0 |
0 |
unless chdir $dir |
|
110
|
0 |
0 |
unless open my $fd, '>', $target |
|
113
|
0 |
0 |
unless close $fd |
|
116
|
0 |
0 |
if $options->{'verbose'} |
|
125
|
0 |
0 |
if (-d '.git') |
|
137
|
0 |
0 |
unless $dir =~ m[/$] |
|
141
|
0 |
0 |
if length $_ < $dl |
|
143
|
0 |
0 |
if (-d $_) |
|
147
|
0 |
0 |
unless -f $_ |
|
148
|
0 |
0 |
if /~$/ |
|
151
|
0 |
0 |
unless open my $fd, '<', $_ |