| line |
true |
false |
branch |
|
69
|
0 |
46 |
if ($0 =~ /zhuli/u) |
|
71
|
0 |
0 |
if ($argv[0] =~ /^do the thing/iu) |
|
73
|
0 |
0 |
unless $is_restarted_process |
|
77
|
0 |
0 |
if ($argv[0] =~ /^do$/iu and $argv[1] =~ /^the$/iu and $argv[2] =~ /^thing$/iu) |
|
81
|
0 |
0 |
unless $is_restarted_process |
|
98
|
0 |
46 |
unless $getopt_ret |
|
104
|
8 |
86 |
if (ref $arg eq 'HASH') |
|
115
|
3 |
43 |
if (exists $options->{'directory'}) |
|
117
|
1 |
2 |
unless (-d $options->{'directory'}) |
|
133
|
0 |
45 |
unless (defined $action) |
|
139
|
4 |
41 |
if ($options->{'diag-run'}) |
|
148
|
5 |
36 |
if (defined $munge) |
|
154
|
20 |
21 |
unless (-d $dest_dir) |
|
159
|
41 |
0 |
unless ($options->{'no-log'}) |
|
162
|
20 |
21 |
unless (-d $log_dir) |
|
171
|
32 |
0 |
unless $pkg->$action($options, @argv) |
|
174
|
9 |
32 |
unless (defined $ret) |
|
187
|
2 |
13 |
unless (defined $_git_str) |
|
191
|
2 |
0 |
if (defined $git_version_str) |
|
208
|
13 |
0 |
if ($git_version_str) |
|
211
|
9 |
4 |
if ('version'->parse($git_version_str) >= 'version'->parse(min_git_ver())) |
|
269
|
109 |
534 |
unless defined $LOGFH |
|
273
|
534 |
0 |
unless ($line =~ /\n$/msux) |
|
288
|
12 |
527 |
unless (defined $line) |
|
302
|
11 |
74 |
unless (defined $line) |
|
316
|
0 |
10 |
unless (defined $line) |
|
341
|
0 |
0 |
unless (defined $key) |
|
348
|
0 |
0 |
unless (defined $idx) |
|
359
|
0 |
0 |
if ($VERBOSE) |
|
375
|
0 |
0 |
if $idx > 1 |
|
387
|
0 |
634 |
unless (defined $line) |
|
396
|
634 |
0 |
if $QUIET |
|
403
|
0 |
0 |
if (@last_key and not $VERBOSE and $last_key[0] ne $key) |
|
412
|
1 |
24 |
unless $QUIET |
|
425
|
56 |
71 |
unless (defined $result) |
|
453
|
0 |
54 |
unless (-e $src) |
|
457
|
0 |
0 |
if $ff->scheme eq 'https' |
|
461
|
0 |
0 |
unless defined $where |
|
477
|
0 |
54 |
unless $ret |
|
485
|
0 |
54 |
unless $error_free |
|
497
|
0 |
388 |
if ($iswin32) { } |
|
530
|
2 |
192 |
if (ref $cmd eq 'GLOB') |
|
538
|
3 |
191 |
if ($wantoutput) |
|
549
|
0 |
194 |
if $VERBOSE |
|
552
|
154 |
40 |
if defined $dest_err_fh |
|
555
|
0 |
194 |
$output_chld->fileno ? : |
|
|
0 |
194 |
$error_chld->fileno ? : |
|
581
|
386 |
2136 |
unless (defined $line) |
|
587
|
0 |
2136 |
if $print_output |
|
589
|
1425 |
711 |
if ($fh eq $output) |
|
591
|
897 |
528 |
if defined $dest_out_fh |
|
593
|
1420 |
5 |
unless $wantoutput |
|
597
|
711 |
1425 |
if ($fh eq $error) |
|
599
|
559 |
152 |
if defined $dest_err_fh |
|
601
|
711 |
0 |
unless $wantoutput |
|
612
|
1 |
193 |
if ($error eq $alrm_code) |
|
620
|
7 |
187 |
if ($?) |
|
623
|
1 |
6 |
$? & 127 ? : |
|
624
|
0 |
7 |
$? & 128 ? : |
|
642
|
184 |
3 |
unless defined wantarray |
|
644
|
1 |
2 |
if (wantarray) |
|
657
|
11 |
0 |
if ($^O ne 'VMS') |
|
660
|
0 |
11 |
unless $this_perl =~ /$App::MechaCPAN::Config{'_exe'}$/iu |
|
662
|
0 |
11 |
unless $local_perl =~ /$App::MechaCPAN::Config{'_exe'}$/iu |
|
671
|
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) |
|
698
|
0 |
0 |
unless exists $site_inc{$lib} |
|
707
|
0 |
0 |
if ${^GLOBAL_PHASE} eq 'RUN' |