| blib/lib/Fsdb/Filter/dbfilecat.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 36 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 214 | 0 | 0 | unless $self->get_options(\@argv, 'help|?', sub { pod2usage(1); } , 'man', sub { pod2usage(-'verbose', 2); } , 'autorun!', \$self->{'_autorun'}, 'close!', \$self->{'_close'}, 'd|debug+', \$self->{'_debug'}, 'i|input=s@', sub { $self->parse_io_option('inputs', @_); } , 'log!', \$self->{'_logprog'}, 'o|output=s', sub { $self->parse_io_option('output', @_); } , 'removeinputs!', \$self->{'_remove_inputs'}, 'xargs!', \$self->{'_xargs'}) |
| 228 | 0 | 0 | if ($#{$$self{'_inputs'};} == -1) |
| 232 | 0 | 0 | if ($self->{'_xargs'} and $#{$$self{'_inputs'};} > 0) |
| 235 | 0 | 0 | if (not $self->{'_xargs'} and $self->{'_remove_inputs'}) |
| 239 | 0 | 0 | if ($self->{'_xargs'}) { } |
| 241 | 0 | 0 | if $#{$$self{'_inputs'};} != 0 |
| 245 | 0 | 0 | if $self->{'_ins'}[0]->error |
| 250 | 0 | 0 | if $self->{'_ins'}[0]->compare($_) ne 'identical' |
| 268 | 0 | 0 | if $self->{'_debug'} |
| 272 | 0 | 0 | if $self->{'_debug'} |
| 285 | 0 | 0 | if ($self->{'_xargs'}) { } |
| 290 | 0 | 0 | if $self->{'_debug'} |
| 292 | 0 | 0 | if (not $self->{'_out'}) { } |
| 296 | 0 | 0 | if $self->{'_out'}->compare($this_in) ne 'identical' |
| 299 | 0 | 0 | if ($self->{'_remove_inputs'}) |
| 301 | 0 | 0 | unless unlink $fref->[0] |
| 304 | 0 | 0 | if $inputs == 0 |
| 310 | 0 | 0 | if $self->{'_debug'} |