| line |
true |
false |
branch |
|
126
|
54 |
0 |
if defined $self->{'OPTIONS'}{'input'} |
|
128
|
0 |
0 |
unless open IN, "<$filename" |
|
146
|
0 |
270 |
unless @_ == 2 |
|
149
|
0 |
270 |
unless exists $known_options{$key} |
|
152
|
54 |
216 |
if (exists $known_options{$key}{lc $value}) { } |
|
|
0 |
216 |
elsif (not exists $known_options{$key}{''}) { } |
|
153
|
54 |
0 |
if defined $value |
|
160
|
54 |
216 |
if exists $actions{$key} |
|
169
|
0 |
1192 |
unless @_ == 1 |
|
172
|
0 |
1192 |
unless exists $known_options{$key} |
|
191
|
0 |
54 |
if ref $class |
|
208
|
0 |
108 |
unless @_ % 2 == 0 |
|
223
|
1192 |
0 |
if @_ == 1 |
|
226
|
0 |
0 |
if @_ == 2 |