| blib/lib/Perl/Tidy/Logger.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 8 | 24 | 33.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 434 | 0 | 0 | 0 | $self->get_use_prefix > 0 and defined $msg_line_number |
| 508 | 0 | 0 | 0 | $self->{'_saw_brace_error'} and $self->{'_logfile_gap'} > 1 || !$save_logfile |
| 525 | 1 | 0 | 0 | $fh->can("close") and not ref $log_file |
| 1 | 0 | 0 | $fh->can("close") and not ref $log_file and $log_file ne "-" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 73 | 3 | 638 | 16 | $fh_warnings or ref $warning_file |
| 191 | 3 | 0 | 0 | $input_line_number - $last_input_line_written >= $self->{'_logfile_gap'} or $input_line =~ /^\s*(sub|package)\s+(\w+)/ |
| 308 | 3465 | 0 | 5091 | $self->{'_at_end_of_file'} or not $self->{'_use_prefix'} |
| 508 | 0 | 0 | 0 | $self->{'_logfile_gap'} > 1 || !$save_logfile |