blib/lib/Fsdb/Filter/dbfilediff.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 2 | 36 | 5.5 |
line | true | false | branch |
---|---|---|---|
268 | 0 | 0 | unless $self->get_options(\@argv, 'help|?', sub { pod2usage(1); } , 'man', sub { pod2usage(-'verbose', 2); } , 'a|all!', sub { $self->{'_join_type'} = 'outer'; } , 'autorun!', \$self->{'_autorun'}, 'close!', \$self->{'_close'}, 'd|debug+', \$self->{'_debug'}, 'E|epsilon!', \$self->{'_epsilon_numerics'}, 'exit!', \$self->{'_exit_one_if_diff'}, 'i|input=s@', sub { $self->parse_io_option('inputs', @_); } , 'log!', \$self->{'_logprog'}, 'N|new-name=s', \$self->{'_destination_column'}, 'o|output=s', sub { $self->parse_io_option('output', @_); } , 'q|quiet+', \$self->{'_quiet'}) |
269 | 0 | 0 | if $#argv != -1 |
288 | 0 | 0 | unless $self->{'_out'}->col_create($self->{'_destination_column'}) |
292 | 0 | 0 | if $self->{'_ins'}[0]->compare($self->{'_ins'}[1]) ne 'identical' |
312 | 0 | 8 | unless defined $match |
324 | 0 | 8 | if $figs eq '' |
360 | 0 | 0 | unless defined $f0 or defined $f1 |
361 | 0 | 0 | unless (defined $f0) |
369 | 0 | 0 | unless (defined $f1) |
380 | 0 | 0 | if ($f0->[$_] ne $f1->[$_]) |
381 | 0 | 0 | if ($epsilon_numerics and $f0->[$_] =~ /\./) { } |
384 | 0 | 0 | unless (defined $g0 and defined $g1) |
403 | 0 | 0 | if (abs $g0 - $g1 > $epsilon) |
417 | 0 | 0 | if (defined $eq) { } |
418 | 0 | 0 | if ($eq eq 'epsilon') { } |
420 | 0 | 0 | if $self->{'_quiet'} <= 1 |
423 | 0 | 0 | if $self->{'_quiet'} == 0 |
436 | 0 | 0 | if ($self->{'_exit_one_if_diff'} and $difference_count > 0) |