| line |
true |
false |
branch |
|
24
|
0 |
0 |
if $AUTOLOAD =~ /\bDESTROY$/
|
|
68
|
3 |
557 |
$rOpts->{'standard-error-output'} ? :
|
|
71
|
16 |
541 |
unless ($fh_warnings or ref $warning_file)
|
|
72
|
0 |
16 |
if (-e $warning_file)
|
|
73
|
0 |
0 |
unless unlink $warning_file
|
|
81
|
1 |
559 |
defined $rOpts->{'logfile-gap'} ? :
|
|
83
|
1 |
559 |
if ($logfile_gap == 0)
|
|
85
|
560 |
0 |
$display_name ? :
|
|
86
|
560 |
0 |
$display_name ? :
|
|
164
|
1 |
558 |
unless ($self->{'_wrote_line_information_string'})
|
|
185
|
3 |
3 |
if ($input_line_number - $last_input_line_written >= $self->{'_logfile_gap'} or $input_line =~ /^\s*(sub|package)\s+(\w+)/)
|
|
194
|
0 |
3 |
if $structural_indentation_level < 0
|
|
202
|
0 |
3 |
if (length $out_str > 35)
|
|
245
|
4 |
4275 |
if ($input_line_number)
|
|
256
|
2 |
2 |
unless $self->{'_wrote_column_headings'}
|
|
261
|
0 |
0 |
$input_line_number < 100 ? :
|
|
|
4 |
0 |
$input_line_number < 10 ? :
|
|
265
|
0 |
0 |
$output_line_number < 100 ? :
|
|
|
4 |
0 |
$output_line_number < 10 ? :
|
|
279
|
0 |
4 |
if ($ci_level > 9)
|
|
280
|
4 |
0 |
$line_of_tokens->{'_nesting_blocks_0'} =~ /1$/ ? :
|
|
282
|
4 |
0 |
if (length $nesting_string_new <= 8)
|
|
294
|
0 |
7243 |
if $self->{'_block_log_output'}
|
|
297
|
2964 |
4279 |
if ($self->{'_at_end_of_file'} or not $self->{'_use_prefix'}) { }
|
|
304
|
4 |
4275 |
if ($line_information_string) { }
|
|
331
|
0 |
0 |
if ($saw_brace_error < 10)
|
|
337
|
0 |
0 |
if ($saw_brace_error == 10)
|
|
350
|
0 |
32 |
if ($rOpts->{'warning-output'}) { }
|
|
357
|
32 |
0 |
if ($msg_line_number)
|
|
378
|
0 |
0 |
unless ($rOpts->{'quiet'})
|
|
383
|
0 |
0 |
unless ($fh_warnings)
|
|
387
|
0 |
0 |
unless $fh_warnings
|
|
389
|
0 |
0 |
unless ref $warning_file
|
|
397
|
0 |
0 |
if ($warning_count < 50)
|
|
399
|
0 |
0 |
unless ($warning_count)
|
|
404
|
0 |
0 |
if ($filename_stamp)
|
|
411
|
0 |
0 |
unless ($rOpts->{'standard-error-output'})
|
|
417
|
0 |
0 |
if ($self->get_use_prefix > 0 and defined $msg_line_number) { }
|
|
433
|
0 |
0 |
if ($filename_stamp)
|
|
446
|
0 |
0 |
if ($warning_count == 50)
|
|
478
|
0 |
560 |
if ($warning_count)
|
|
479
|
0 |
0 |
if ($save_logfile)
|
|
487
|
0 |
0 |
if ($self->{'_complaint_count'} > 0)
|
|
494
|
0 |
0 |
if ($self->{'_saw_brace_error'} and $self->{'_logfile_gap'} > 1 || !$save_logfile)
|
|
502
|
2 |
558 |
if ($save_logfile)
|
|
506
|
2 |
0 |
if ($fh)
|
|
509
|
0 |
0 |
if ($fh->can("close") and !ref($log_file) ne "-" and $log_file ne "-")
|
|
513
|
0 |
0 |
unless $fh->close
|