Branch Coverage

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)