| line |
true |
false |
branch |
|
25
|
0 |
0 |
if $AUTOLOAD =~ /\bDESTROY$/
|
|
50
|
0 |
657 |
if (@arglist % 2)
|
|
70
|
3 |
654 |
$rOpts->{'standard-error-output'} ? :
|
|
73
|
16 |
638 |
unless ($fh_warnings or ref $warning_file)
|
|
74
|
0 |
16 |
if (-e $warning_file)
|
|
75
|
0 |
0 |
unless unlink $warning_file
|
|
83
|
1 |
656 |
defined $rOpts->{'logfile-gap'} ? :
|
|
85
|
1 |
656 |
if ($logfile_gap == 0)
|
|
87
|
657 |
0 |
$display_name ? :
|
|
88
|
657 |
0 |
$display_name ? :
|
|
166
|
0 |
656 |
unless ($self->{'_wrote_line_information_string'})
|
|
191
|
3 |
0 |
if ($input_line_number - $last_input_line_written >= $self->{'_logfile_gap'} or $input_line =~ /^\s*(sub|package)\s+(\w+)/)
|
|
200
|
0 |
3 |
if $structural_indentation_level < 0
|
|
208
|
0 |
3 |
if (length $out_str > 35)
|
|
251
|
3 |
5088 |
if ($input_line_number)
|
|
263
|
1 |
2 |
unless $self->{'_wrote_column_headings'}
|
|
268
|
0 |
0 |
$input_line_number < 100 ? :
|
|
|
3 |
0 |
$input_line_number < 10 ? :
|
|
272
|
0 |
0 |
$output_line_number < 100 ? :
|
|
|
3 |
0 |
$output_line_number < 10 ? :
|
|
286
|
0 |
3 |
if ($ci_level > 9)
|
|
287
|
3 |
0 |
$line_of_tokens->{'_nesting_blocks_0'} =~ /1$/ ? :
|
|
289
|
3 |
0 |
if (length $nesting_string_new <= 8)
|
|
305
|
0 |
8556 |
if $self->{'_block_log_output'}
|
|
308
|
3465 |
5091 |
if ($self->{'_at_end_of_file'} or not $self->{'_use_prefix'}) { }
|
|
315
|
3 |
5088 |
if ($line_information_string) { }
|
|
342
|
0 |
0 |
if ($saw_brace_error < 10)
|
|
348
|
0 |
0 |
if ($saw_brace_error == 10)
|
|
361
|
0 |
42 |
if ($rOpts->{'warning-output'}) { }
|
|
368
|
42 |
0 |
if ($msg_line_number)
|
|
393
|
0 |
0 |
unless ($rOpts->{'quiet'})
|
|
398
|
0 |
0 |
unless ($fh_warnings)
|
|
402
|
0 |
0 |
unless ($fh_warnings)
|
|
406
|
0 |
0 |
unless ref $warning_file
|
|
414
|
0 |
0 |
if ($warning_count < 50)
|
|
416
|
0 |
0 |
unless ($warning_count)
|
|
421
|
0 |
0 |
if ($filename_stamp)
|
|
428
|
0 |
0 |
unless ($rOpts->{'standard-error-output'})
|
|
434
|
0 |
0 |
if ($self->get_use_prefix > 0 and defined $msg_line_number) { }
|
|
450
|
0 |
0 |
if ($filename_stamp)
|
|
463
|
0 |
0 |
if ($warning_count == 50)
|
|
492
|
0 |
657 |
if ($warning_count)
|
|
493
|
0 |
0 |
if ($save_logfile)
|
|
501
|
0 |
0 |
if ($self->{'_complaint_count'} > 0)
|
|
508
|
0 |
0 |
if ($self->{'_saw_brace_error'} and $self->{'_logfile_gap'} > 1 || !$save_logfile)
|
|
516
|
1 |
656 |
if ($save_logfile)
|
|
519
|
0 |
1 |
if (not $fh) { }
|
|
525
|
0 |
0 |
if ($fh->can("close") and not ref $log_file and $log_file ne "-")
|
|
529
|
0 |
0 |
unless $fh->close
|