| line |
!l |
l&&!r |
l&&r |
condition |
|
386
|
0 |
0 |
0 |
$timeout_in_seconds and $timeout_in_seconds > 0
|
|
472
|
0 |
0 |
0 |
length $nag_message and $Warn_count > 0
|
|
661
|
2 |
0 |
0 |
$rexceptions and $rexceptions->{$word}
|
|
674
|
4693 |
0 |
0 |
$rexceptions and $rexceptions->{$word}
|
|
675
|
0 |
0 |
4693 |
$word =~ /^\w+$/ and not $word =~ /^\d/
|
|
678
|
0 |
0 |
0 |
$allow_module_path and index $word, ":"
|
|
683
|
0 |
0 |
0 |
$sub_word =~ /^\w+$/ and not $sub_word =~ /^\d/
|
|
964
|
0 |
0 |
0 |
$dump_options_type ne "perltidyrc" and $dump_options_type ne "full"
|
|
1207
|
656 |
0 |
1 |
$rOpts->{'line-range-tidy'} && ($self->[13] > 1 || defined $self->[14])
|
|
1229
|
0 |
648 |
9 |
not $num_files and @ARGV_saved > 1
|
|
1232
|
0 |
9 |
0 |
$opt_test =~ s/^[-]+// and not $file_test =~ /^[-]/
|
|
|
9 |
0 |
0 |
$opt_test =~ s/^[-]+// and not $file_test =~ /^[-]/ and not $file_test =~ /^\d+$/
|
|
|
9 |
0 |
0 |
$opt_test =~ s/^[-]+// and not $file_test =~ /^[-]/ and not $file_test =~ /^\d+$/ and -e $file_test
|
|
1250
|
0 |
0 |
0 |
$long_name and defined $rOpts->{$long_name}
|
|
|
0 |
0 |
0 |
$long_name and defined $rOpts->{$long_name} and $rOpts->{$long_name} eq $file_test
|
|
|
0 |
0 |
0 |
$long_name and defined $rOpts->{$long_name} and $rOpts->{$long_name} eq $file_test and not $is_option_with_file_parameter{$long_name}
|
|
1271
|
657 |
0 |
0 |
$in_place_modify and $backup_extension
|
|
1362
|
657 |
0 |
0 |
@Arg_files > 1 and $rOpts->{'file-size-order'}
|
|
1474
|
655 |
0 |
2 |
$rOpts->{'backup-and-modify-in-place'} && $rOpts->{'format'} eq 'tidy'
|
|
1551
|
0 |
657 |
0 |
defined $backup_method and $backup_method ne "copy"
|
|
|
657 |
0 |
0 |
defined $backup_method and $backup_method ne "copy" and $backup_method ne "move"
|
|
1649
|
0 |
0 |
0 |
not $self->[25] and defined $write_time
|
|
1660
|
0 |
0 |
0 |
$delete_backup and -f $backup_file
|
|
1664
|
0 |
0 |
0 |
$delete_backup > 1 and $self->[15]->get_warning_count
|
|
1676
|
0 |
0 |
0 |
not -s $input_file and -s $backup_file
|
|
|
0 |
0 |
0 |
not -s $input_file and -s $backup_file and $delete_backup == 1
|
|
1787
|
0 |
0 |
0 |
not $self->[25] and defined $write_time
|
|
1798
|
0 |
0 |
0 |
$delete_backup and -f $backup_name
|
|
1802
|
0 |
0 |
0 |
$delete_backup > 1 and $self->[15]->get_warning_count
|
|
1814
|
0 |
0 |
0 |
not -s $input_file and -s $backup_name
|
|
|
0 |
0 |
0 |
not -s $input_file and -s $backup_name and $delete_backup == 1
|
|
1859
|
2 |
0 |
0 |
$in_place_modify and chown $uid_i, $gid_i, $output_file
|
|
2006
|
644 |
2 |
0 |
$decoder and ref $decoder
|
|
2008
|
0 |
0 |
0 |
$encoding_in ne "UTF-8" and $encoding_in ne "utf8"
|
|
2252
|
0 |
0 |
4 |
$input_line_separator eq $CRLF and "\n" eq $LF
|
|
2401
|
3 |
0 |
0 |
$in_place_modify and not -w $input_file
|
|
2403
|
0 |
0 |
0 |
defined $backup_method and $backup_method eq "copy"
|
|
2446
|
654 |
3 |
0 |
not $source_stream and $input_file =~ /$forbidden_file_extensions/ || $input_file eq 'DIAGNOSTICS'
|
|
2474
|
0 |
0 |
0 |
$number_of_files > 0 && !$line_range_clipped
|
|
2497
|
657 |
0 |
0 |
defined $output_file and length $output_file
|
|
2531
|
0 |
0 |
0 |
@input_file_stat and $output_file eq $input_file
|
|
2577
|
646 |
11 |
0 |
$is_encoded_data and $self->[26]
|
|
2639
|
1 |
0 |
656 |
$rOpts->{'format'} eq "tidy" and defined $routput_string
|
|
2694
|
0 |
0 |
0 |
defined $backup_method and $backup_method eq "copy"
|
|
2753
|
0 |
0 |
4 |
$output_file and -f $output_file
|
|
|
0 |
0 |
4 |
$output_file and -f $output_file and not -l $output_file
|
|
3097
|
2 |
0 |
0 |
$fh_tee and $fh_tee->can("close")
|
|
|
2 |
0 |
0 |
$fh_tee and $fh_tee->can("close") and not ref $tee_file
|
|
|
0 |
0 |
0 |
$fh_tee and $fh_tee->can("close") and not ref $tee_file and $tee_file ne "-"
|
|
3182
|
654 |
0 |
5 |
$max_iterations > 1 and not defined $iteration_of_formatter_convergence
|
|
|
654 |
0 |
5 |
$max_iterations > 1 and not defined $iteration_of_formatter_convergence and $formatter->can("get_convergence_check")
|
|
3215
|
1 |
0 |
0 |
$iter == 1 and not $stop_now
|
|
|
1 |
0 |
0 |
$iter == 1 and not $stop_now and $formatter->can("want_second_iteration")
|
|
|
0 |
0 |
0 |
$iter == 1 and not $stop_now and $formatter->can("want_second_iteration") and $formatter->want_second_iteration
|
|
3262
|
1 |
0 |
0 |
$diagnostics_object and $iterm > 2
|
|
3309
|
656 |
1 |
0 |
$fh_tee and $fh_tee->can("close")
|
|
|
657 |
0 |
0 |
$fh_tee and $fh_tee->can("close") and not ref $tee_file
|
|
|
1 |
0 |
0 |
$fh_tee and $fh_tee->can("close") and not ref $tee_file and $tee_file ne "-"
|
|
3388
|
0 |
645 |
6 |
$rOpts->{'encode-output-strings'} && $self->[2]
|
|
3469
|
0 |
0 |
0 |
defined $s1 and defined $s2
|
|
3521
|
0 |
0 |
0 |
$leni and $leno
|
|
3537
|
0 |
0 |
0 |
@aryi and @aryo
|
|
4880
|
655 |
0 |
0 |
$saw_dump_profile and $saw_ignore_profile
|
|
5176
|
0 |
0 |
3 |
defined $input_string and length $input_string
|
|
5258
|
4077 |
0 |
0 |
$leading_dash_check{$opt_name} and substr($test_string, 0, 1) eq "-"
|
|
5271
|
3420 |
657 |
0 |
$leading_space_check{$opt_name} and $test_string =~ /^\s/
|
|
5276
|
3420 |
657 |
0 |
$trailing_space_check{$opt_name} and $test_string =~ /\s$/
|
|
5340
|
0 |
44678 |
0 |
defined $min and $val < $min
|
|
5349
|
20369 |
24309 |
0 |
defined $max and $val > $max
|
|
5439
|
656 |
0 |
1 |
defined $rOpts->{'logfile-gap'} and $rOpts->{'logfile-gap'} >= 0
|
|
5521
|
654 |
0 |
3 |
defined $rOpts->{'sub-alias-list'} and length $rOpts->{'sub-alias-list'}
|
|
5585
|
0 |
1 |
0 |
defined $n2 and $n2 < $n1
|
|
5785
|
15 |
0 |
1211 |
substr($arg, 0, 2) eq "--" and length $arg > 2
|
|
5788
|
1211 |
0 |
0 |
$arg_seeking_string_last and $arg =~ /^\-\-[A-Za-z]/
|
|
5795
|
652 |
559 |
0 |
index($arg, "=") == -1 and $$ris_string_option{substr $arg, 2}
|
|
5943
|
0 |
0 |
0 |
$os eq '2000' && $major != 5
|
|
6191
|
0 |
1 |
3 |
$line and $line =~ /^\s*---(\w[\w-]*)/
|
|
6198
|
2 |
1 |
0 |
not $is_known and $word =~ s/^no-?//
|
|
6269
|
0 |
0 |
0 |
$body and $body =~ s/\}$//
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
696
|
0 |
0 |
0 |
$on_error eq "warn" or $on_error eq "die"
|
|
1484
|
2 |
0 |
0 |
$destination_stream or not defined $source
|
|
|
2 |
0 |
0 |
$destination_stream or not defined $source or ref $source
|
|
|
0 |
0 |
0 |
$destination_stream or not defined $source or ref $source or $source eq "-"
|
|
|
0 |
0 |
0 |
$destination_stream or not defined $source or ref $source or $source eq "-" or $rOpts->{'outfile'}
|
|
|
0 |
0 |
0 |
$destination_stream or not defined $source or ref $source or $source eq "-" or $rOpts->{'outfile'} or defined $rOpts->{'output-path'}
|
|
1854
|
2 |
0 |
0 |
$uid_i != $uid_o or $gid_i != $gid_o
|
|
1975
|
0 |
0 |
655 |
not $rOpts_character_encoding or $rOpts_character_encoding eq "none"
|
|
2392
|
3 |
0 |
0 |
-T $input_file or $rOpts->{'force-read-binary'}
|
|
2446
|
0 |
0 |
3 |
$input_file =~ /$forbidden_file_extensions/ || $input_file eq 'DIAGNOSTICS'
|
|
2847
|
0 |
0 |
1 |
not defined $line_tidy_end or $line_tidy_end > $num
|
|
2862
|
0 |
0 |
656 |
$rOpts->{'assert-tidy'} or $rOpts->{'assert-untidy'}
|
|
|
0 |
2 |
654 |
$rOpts->{'assert-tidy'} or $rOpts->{'assert-untidy'} or $rOpts->{'backup-and-modify-in-place'}
|
|
2873
|
655 |
0 |
1 |
$rOpts->{'add-terminal-newline'} || substr(${$rinput_string;}, -1, 1) =~ /\n/
|
|
2942
|
1 |
0 |
655 |
@input_lines_pre or @input_lines_post
|
|
3018
|
2 |
0 |
0 |
$self->[1] || $fileroot . $self->make_file_extension('DEBUG')
|
|
3027
|
1 |
0 |
656 |
$rOpts->{'tee-pod'} or $rOpts->{'tee-block-comments'}
|
|
|
0 |
0 |
656 |
$rOpts->{'tee-pod'} or $rOpts->{'tee-block-comments'} or $rOpts->{'tee-side-comments'}
|
|
3031
|
1 |
0 |
0 |
$self->[22] || $fileroot . $self->make_file_extension('TEE')
|
|
3052
|
0 |
0 |
656 |
not defined $max_iterations or $max_iterations <= 0
|
|
3200
|
0 |
0 |
4 |
$stop_now ||= $tokenizer->get_unexpected_error_count
|
|
3212
|
0 |
2 |
2 |
$stop_now ||= defined $iteration_of_formatter_convergence
|
|
3247
|
0 |
0 |
0 |
$stopping_on_error ||= $convergence_log_message
|
|
3383
|
648 |
3 |
0 |
$ref_destination_stream eq "SCALAR" or $ref_destination_stream eq "ARRAY"
|
|
4713
|
650 |
0 |
7 |
defined $perltidyrc_stream || $dump_options_type
|
|
5136
|
14 |
0 |
4601 |
$seen{$word} or $is_excluded_word{$word}
|
|
5262
|
0 |
0 |
0 |
$opt_name eq "outfile" or $opt_name eq "output_path"
|
|
5324
|
0 |
0 |
657 |
not defined $integer_range_check or $integer_range_check <= 0
|
|
|
0 |
0 |
657 |
not defined $integer_range_check or $integer_range_check <= 0 or $integer_range_check > 3
|
|
5446
|
641 |
12 |
4 |
$rOpts->{'add-whitespace'} or $rOpts->{'delete-old-whitespace'}
|
|
|
12 |
1 |
3 |
$rOpts->{'add-whitespace'} or $rOpts->{'delete-old-whitespace'} or $rOpts->{'add-newlines'}
|
|
|
1 |
0 |
3 |
$rOpts->{'add-whitespace'} or $rOpts->{'delete-old-whitespace'} or $rOpts->{'add-newlines'} or $rOpts->{'delete-old-newlines'}
|
|
5539
|
0 |
0 |
6 |
$rOpts->{'maximum-line-length'} != 1 or $rOpts->{'continuation-indentation'} != 0
|
|
5554
|
641 |
12 |
4 |
$rOpts->{'add-whitespace'} || $rOpts->{'delete-old-whitespace'}
|
|
6195
|
1 |
1 |
1 |
$roption_category->{$word} || $rexpansion->{$word}
|
|
6414
|
0 |
32 |
0 |
not length $out_string or $out_string =~ s/\s+$//
|