line |
true |
false |
branch |
44
|
0 |
19 |
if @unknown_keys |
46
|
13 |
6 |
if ($self->{'setup'}{'pipemode'}) |
52
|
0 |
19 |
unless defined $self->{'setup'}{'parconf'} |
58
|
19 |
0 |
unless defined $self->{'setup'}{'parconf'}{'copyright'} |
60
|
19 |
0 |
unless defined $self->{'setup'}{'parconf'}{'version'} |
62
|
19 |
0 |
unless defined $self->{'setup'}{'parconf'}{'author'} |
64
|
1 |
18 |
unless defined $self->{'setup'}{'pardef'} |
66
|
0 |
19 |
if ($prob ne '') |
72
|
0 |
19 |
unless $self->add_param('Text::NumericData', \%Text::NumericData::defaults, \%Text::NumericData::help) |
75
|
0 |
19 |
unless $self->add_param('Text::NumericData::File', \%Text::NumericData::File::defaults, \%Text::NumericData::File::help) |
88
|
0 |
270 |
if defined $self->{'setup'}{'exclude'} and grep {$_ eq $pn;} @{$$self{'setup'}{'exclude'};} |
90
|
0 |
270 |
unless defined $help |
100
|
0 |
270 |
if (Config::Param::sane_pardef($self->{'setup'}{'parconf'}, [$thisdef]) ne '') |
113
|
0 |
43 |
unless defined $argv |
114
|
7 |
36 |
unless defined $in |
115
|
0 |
43 |
unless defined $out |
131
|
0 |
43 |
if (@{$errors;}) |
136
|
0 |
43 |
if $self->{'param'}{'help'} or $self->{'param'}{'version'} |
138
|
36 |
7 |
if ($self->{'setup'}{'pipemode'}) { } |
140
|
32 |
4 |
if (defined $self->{'setup'}{'pipe_init'}) |
143
|
0 |
32 |
if ($err) |
149
|
11 |
25 |
if ($self->{'setup'}{'filemode'}) { } |
157
|
11 |
0 |
if $ret >= 0 and defined $self->{'setup'}{'pipe_file'} |
158
|
11 |
0 |
if $ret <= 0 |
161
|
0 |
11 |
if defined $self->{'setup'}{'pipe_allend'} |
163
|
0 |
11 |
if $self->{'txd'}{'config'}{'pipemode'} |
177
|
25 |
0 |
defined $self->{'setup'}{'pipe_begin'} ? : |
|
10 |
15 |
defined $self->{'setup'}{'pipe_line'} ? : |
191
|
11 |
30 |
if $self->{'setup'}{'filemode'} |
195
|
11 |
30 |
$self->{'setup'}{'filemode'} ? : |
205
|
33 |
441 |
unless ($self->{'state'}{'data'}) |
207
|
15 |
18 |
if ($self->{'txd'}->line_check($_[0])) { } |
211
|
3 |
12 |
if defined $self->{'setup'}{'pipe_first_data'} |
216
|
16 |
2 |
if defined $self->{'setup'}{'pipe_header'} |
222
|
456 |
0 |
if defined $self->{'setup'}{'pipe_data'} |
223
|
3 |
453 |
if defined $prefix |
230
|
0 |
0 |
if defined $_[0] |
231
|
0 |
0 |
defined $_[1] ? : |