| line |
true |
false |
branch |
|
26
|
13 |
5 |
unless exists $args{$i} |
|
32
|
2 |
0 |
unless exists $$self{'usage'} |
|
33
|
2 |
0 |
unless ($$self{'cmd'}) |
|
40
|
0 |
2 |
if $v =~ /\$?Revision:?\s*([\d\.]+)/ |
|
44
|
2 |
0 |
if ($$self{'modes'}) |
|
48
|
1 |
3 |
if $m eq 'test' |
|
55
|
2 |
0 |
if $$self{'usage'} and not $self->_has_option('help') |
|
59
|
2 |
0 |
unless ($self->_has_option('man')) |
|
71
|
14 |
1 |
$longname ? : |
|
73
|
1 |
14 |
ref $ref ? : |
|
77
|
2 |
0 |
unless $$self{'configure'} |
|
79
|
2 |
0 |
if @gconf |
|
90
|
0 |
2 |
if ($$self{'_allow_man'} and $$opt{'man'}) { } |
|
|
0 |
2 |
elsif ($$self{'usage'} and $$opt{'help'} || $self->status == 0) { } |
|
110
|
0 |
0 |
if defined $script |
|
130
|
1 |
0 |
if ($name) |
|
132
|
1 |
0 |
if $version |
|
139
|
0 |
12 |
unless defined $desc |
|
141
|
14 |
12 |
length $_ > 1 ? : |
|
143
|
2 |
10 |
unless length $onames[0] == 1 |
|
161
|
44 |
7 |
ref $m eq 'ARRAY' ? : |
|
165
|
60 |
12 |
if $la < 2 or $lb < 2 |
|
172
|
0 |
4 |
if grep(($_ eq $option), map($self->_option_names($$_[0]), @{$$self{'struct'};})) |
|
179
|
0 |
1 |
if exists $$self{'_program'} |
|
181
|
0 |
1 |
if (defined $script and not -e $script) |