Branch Coverage

blib/lib/App/MechaCPAN.pm
Criterion Covered Total %
branch 69 116 59.4


line true false branch
64 0 31 if ($0 =~ /zhuli/u)
66 0 0 if ($argv[0] =~ /^do the thing/iu)
68 0 0 unless $is_restarted_process
72 0 0 if ($argv[0] =~ /^do$/iu and $argv[1] =~ /^the$/iu and $argv[2] =~ /^thing$/iu)
76 0 0 unless $is_restarted_process
93 0 31 unless $getopt_ret
99 5 54 if (ref $arg eq 'HASH')
110 3 28 if (exists $options->{'directory'})
112 1 2 unless (-d $options->{'directory'})
128 0 30 unless (defined $action)
134 4 26 if ($options->{'diag-run'})
143 17 9 unless (-d $dest_dir)
148 26 0 unless ($options->{'no-log'})
151 17 9 unless (-d $log_dir)
160 21 0 unless $pkg->$action($options, @argv)
163 5 21 unless (defined $ret)
187 1 278 unless (defined $line)
201 1 34 unless (defined $line)
226 0 0 unless (defined $key)
231 0 0 unless (defined $idx)
242 0 0 if ($VERBOSE)
269 0 314 unless (defined $line)
276 314 0 if $QUIET
283 0 0 if (@last_key and not $VERBOSE)
292 1 19 unless $QUIET
305 45 49 unless (defined $result)
333 0 36 unless (-e $src)
337 0 0 if $ff->scheme eq 'https'
341 0 0 unless defined $where
357 0 36 unless $ret
365 0 36 unless $error_free
377 0 280 if ($iswin32) { }
410 2 138 if (ref $cmd eq 'GLOB')
417 1 139 if ($wantoutput)
427 0 140 if $VERBOSE
430 100 40 if defined $dest_err_fh
433 0 140 $output_chld->fileno ? :
0 140 $error_chld->fileno ? :
459 278 2002 unless (defined $line)
465 0 2002 if $print_output
467 1183 819 if ($fh eq $output)
469 767 416 if defined $dest_out_fh
471 1180 3 unless $wantoutput
475 819 1183 if ($fh eq $error)
477 635 184 if defined $dest_err_fh
479 819 0 unless $wantoutput
490 1 139 if ($error eq $alrm_code)
498 6 134 if ($?)
501 1 5 $? & 127 ? :
502 0 6 $? & 128 ? :
520 133 1 unless defined wantarray
522 1 0 if (wantarray)
535 1 0 if ($^O ne 'VMS')
538 0 1 unless $this_perl =~ /$App::MechaCPAN::Config{'_exe'}$/iu
540 0 1 unless $local_perl =~ /$App::MechaCPAN::Config{'_exe'}$/iu
549 0 0 if ($loaded_at_compile and -e -x $local_perl and $this_perl ne $local_perl and -e -f -r $0 and not $^P)
576 0 0 unless exists $site_inc{$lib}
585 0 0 if ${^GLOBAL_PHASE} eq 'RUN'