| line |
true |
false |
branch |
|
38
|
0 |
0 |
unless defined $action |
|
39
|
0 |
0 |
if (my $method = $self->can("action_$action")) { } |
|
52
|
0 |
0 |
scalar @_ && length $_[0] && substr($_[0], 0, 1) ne '-' ? : |
|
60
|
0 |
0 |
unless &GetOptions(\%config, ('mailrc|m|1=s', 'output|packages-details|o|2=s', 'modlist|modlist-data|l|3=s', 'target|t=s', 'test|T!', 'author|a=s', 'usage!', 'help!', 'man!', 'version!')) |
|
74
|
0 |
0 |
if $config{'version'} |
|
75
|
0 |
0 |
if $config{'usage'} |
|
77
|
0 |
0 |
if $config{'help'} |
|
78
|
0 |
0 |
if $config{'man'} |
|
95
|
0 |
0 |
if wantarray |
|
122
|
0 |
0 |
if (defined(my $confout = $self->config($config_key))) |
|
123
|
0 |
0 |
$confout eq '-' ? : |
|
|
0 |
0 |
!length($confout) ? : |
|
128
|
0 |
0 |
if (defined $output) { } |
|
130
|
0 |
0 |
ref $contents ? : |
|
197
|
0 |
0 |
if (ref $path eq 'GLOB') { } |
|
202
|
0 |
0 |
unless -d $path->dir->stringify |
|
207
|
0 |
0 |
if ($is_gz) { } |
|
266
|
0 |
0 |
if $score != 0 |
|
267
|
0 |
0 |
unless exists $data_for{'module'}{$module} |
|
270
|
0 |
0 |
if (not defined $version) { } |
|
|
0 |
0 |
elsif (defined $previous->{'version'}) { } |
|
271
|
0 |
0 |
if defined $previous->{'version'} |
|
283
|
0 |
0 |
if ($score < 0) |
|
290
|
0 |
0 |
if ($previous) |
|
301
|
0 |
0 |
if wantarray |
|
316
|
0 |
0 |
if $fw < length $module |
|
320
|
0 |
0 |
if wantarray |
|
328
|
0 |
0 |
if -d $target |
|
339
|
0 |
0 |
unless -d $target |
|
343
|
0 |
0 |
$self->execute_tests ? : |
|
357
|
0 |
0 |
unless IPC::Run::run(\@command, \(undef), \*STDOUT, \*STDERR) |
|
374
|
0 |
0 |
unless (-e $file) |
|
396
|
0 |
0 |
if (not -e $file) |
|
413
|
0 |
0 |
unless -d $target |
|
458
|
0 |
0 |
if /^action_/u |