| line |
true |
false |
branch |
|
38
|
0 |
3 |
if $h > 99 |
|
50
|
2 |
5 |
if ($string =~ /^([1-9][0-9]*)\s*s$/i) { } |
|
|
2 |
3 |
elsif ($string =~ /^([1-9][0-9]*)\s*m$/i) { } |
|
55
|
0 |
3 |
unless defined $string |
|
64
|
26 |
7 |
unless $_ eq '--help' |
|
|
1 |
15 |
if (@argv == 0) { } |
|
|
7 |
8 |
elsif (grep {$_ eq '-h' unless $_ eq '--help';} @argv) { } |
|
71
|
2 |
5 |
if (@argv == 1) { } |
|
101
|
5 |
16 |
if ($original_argv[$i] eq '--run') |
|
106
|
15 |
6 |
if (defined $run_position) |
|
107
|
5 |
10 |
if ($run_position == $i) { } |
|
|
5 |
5 |
elsif ($run_position + 1 == $i) { } |
|
|
4 |
1 |
elsif ($run_position + 2 == $i) { } |
|
123
|
7 |
14 |
unless (defined $run_position) |
|
128
|
1 |
7 |
if (defined $run_got_all_options and not $run_got_all_options) |
|
135
|
3 |
4 |
if (@run_options) |
|
140
|
2 |
5 |
if (not @argv) { } |
|
168
|
0 |
0 |
if (not $$options{'error'}) { } |
|
169
|
0 |
0 |
if (grep {$_ eq 'help';} @{$$options{'actions'};}) |
|
174
|
0 |
0 |
if (grep {$_ eq 'run';} @{$$options{'actions'};}) |
|
181
|
0 |
0 |
if ($@) |
|
190
|
0 |
0 |
if (grep {$_ eq 'help_cant_be_used_with_other_options';} @{$$options{'error_actions'};}) { } |
|
|
0 |
0 |
elsif (grep {$_ eq 'incorrect_run_usage';} @{$$options{'error_actions'};}) { } |
|
|
0 |
0 |
elsif (grep {$_ eq 'unknown_option';} @{$$options{'error_actions'};}) { } |
|
197
|
0 |
0 |
@{$$options{'error_options'};} > 1 ? : |
|
215
|
0 |
0 |
if ($second2cmd{$seconds}) |