| blib/lib/Fsdb/Filter/dbroweval.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 42 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 346 | 0 | 0 | unless $c =~ /\;\s*$/ |
| 379 | 0 | 0 | unless $self->get_options(\@_, 'help|?', sub { pod2usage(1); } , 'man', sub { pod2usage('-verbose', 2); } , 'autorun!', \$self->{'_autorun'}, 'b|begin=s@', $self->{'_beg_code'}, 'close!', \$self->{'_close'}, 'd|debug+', \$self->{'_debug'}, 'e|end=s@', $self->{'_end_code'}, 'f|code-files=s@', $self->{'_code_files'}, 'header=s', \$self->{'_header'}, 'i|input=s', sub { $self->parse_io_option('input', @_); } , 'log!', \$self->{'_logprog'}, 'm|manual-output', \$self->{'_manual_output'}, 'n|no-output', \$self->{'_no_output'}, 'N|no-output-even-comments', \$self->{'_no_output_even_comments'}, 'o|output=s', sub { $self->parse_io_option('output', @_); } , 'saveoutput=s', \$self->{'_save_output'}, 'w|warnings!', \$self->{'_warnings'}) |
| 401 | 0 | 0 | unless open INF, "<$_" |
| 411 | 0 | 0 | if ($self->{'_no_output_even_comments'}) |
| 416 | 0 | 0 | unless $self->{'_no_output_even_comments'} |
| 417 | 0 | 0 | if defined $self->{'_header'} |
| 433 | 0 | 0 | if $#{$$iref[$DB_CODE_A_F];} < 0 |
| 436 | 0 | 0 | if $this_needs_lfref |
| 438 | 0 | 0 | if $code =~ /lfref/ |
| 441 | 0 | 0 | if $self->{'_debug'} |
| 443 | 0 | 0 | if $self->{'_debug'} == 1 |
| 460 | 0 | 0 | if ($self->{'_manual_output'}) { } |
| 464 | 0 | 0 | $self->{'_no_output'} ? : |
| 471 | 0 | 0 | $self->{'_warnings'} ? : |
| 0 | 0 | defined $beg_code ? : | |
| 0 | 0 | defined $code ? : | |
| 0 | 0 | $any_needs_lfref ? : | |
| 0 | 0 | defined $end_code ? : | |
| 500 | 0 | 0 | if $self->{'_debug'} >= 2 |
| 502 | 0 | 0 | if $@ |
| 532 | 0 | 0 | if $self->{'_no_output_even_comments'} |