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 |
46 |
unless defined $argv |
114
|
7 |
39 |
unless defined $in |
115
|
0 |
46 |
unless defined $out |
131
|
0 |
46 |
if (@{$errors;}) |
136
|
0 |
46 |
if $self->{'param'}{'help'} or $self->{'param'}{'version'} |
138
|
39 |
7 |
if ($self->{'setup'}{'pipemode'}) { } |
140
|
35 |
4 |
if (defined $self->{'setup'}{'pipe_init'}) |
143
|
0 |
35 |
if ($err) |
149
|
11 |
28 |
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
|
28 |
0 |
defined $self->{'setup'}{'pipe_begin'} ? : |
|
10 |
18 |
defined $self->{'setup'}{'pipe_line'} ? : |
191
|
11 |
33 |
if $self->{'setup'}{'filemode'} |
195
|
11 |
33 |
$self->{'setup'}{'filemode'} ? : |
205
|
42 |
450 |
unless ($self->{'state'}{'data'}) |
207
|
18 |
24 |
if ($self->{'txd'}->line_check($_[0])) { } |
211
|
7 |
11 |
if defined $self->{'setup'}{'pipe_first_data'} |
216
|
24 |
0 |
if defined $self->{'setup'}{'pipe_header'} |
222
|
468 |
0 |
if defined $self->{'setup'}{'pipe_data'} |
223
|
7 |
461 |
if defined $prefix |
230
|
0 |
0 |
if defined $_[0] |
231
|
0 |
0 |
defined $_[1] ? : |