line |
true |
false |
branch |
30
|
0 |
0 |
$options->{'bash'} ? : |
|
0 |
0 |
$options->{'zsh'} ? : |
31
|
0 |
0 |
unless $shell |
34
|
0 |
0 |
if (defined $name) |
67
|
0 |
0 |
if (ref $spec_file eq 'SCALAR') { } |
75
|
0 |
0 |
if (@errors) { } |
94
|
0 |
0 |
unless ($name =~ /^\w[\w+-]*/) |
97
|
0 |
0 |
unless ($class =~ /^[a-zA-Z]\w*(::\w+)+$/) |
103
|
0 |
0 |
if (-d $dist and not $overwrite) { } |
|
0 |
0 |
elsif (-d $dist) { } |
122
|
0 |
0 |
$options->{'with-subcommands'} ? : |
155
|
0 |
0 |
if ($options->{'with-subcommands'}) |
177
|
0 |
0 |
unless open my $fh, '>', $specfile |
181
|
0 |
0 |
unless open $fh, '>', $module_path |
185
|
0 |
0 |
unless open $fh, '>', "$dist/bin/$name" |