| line |
true |
false |
branch |
|
46
|
1 |
1 |
scalar @_ ? : |
|
75
|
0 |
5 |
if ($$options{'version'}) |
|
78
|
0 |
0 |
unless print {*STDOUT;} "$app version is $version\n" |
|
86
|
5 |
0 |
if (scalar @options) |
|
92
|
0 |
28 |
if (ref $opt ne 'ARRAY') |
|
101
|
5 |
23 |
if (not defined $spec || defined $desc || defined $params) { } |
|
|
23 |
0 |
elsif (defined $spec and $spec =~ /^([^!+=:]+)/isu) { } |
|
111
|
6 |
17 |
if (ref $params eq 'HASH') |
|
113
|
3 |
3 |
if (exists $$params{'default'} and not exists $$options{$name}) |
|
118
|
1 |
1 |
if ($$params{'required'} and not $$options{'help'} and not exists $$options{$name}) |
|
124
|
10 |
12 |
defined $short ? : |
|
|
20 |
2 |
defined $long ? : |
|
137
|
0 |
4 |
if ($$options{'help'}) |
|
138
|
0 |
0 |
unless print {*STDOUT;} $help |