| line |
true |
false |
branch |
|
20
|
0 |
10 |
unless &GetOptions("fix", \$fix, "diff", \$diff, "check", \$check, "lang=s", \$lang, "tabs", \$tabs, "spaces=i", \$spaces, "indent-pp", \$indent_pp, "no-indent-pp", \$no_indent_pp, "range=s", \$range, "exclude=s", \@exclude, "include=s", \@include, "verbose|v", \$verbose) |
|
60
|
1 |
9 |
if (defined $spaces) { } |
|
|
1 |
8 |
elsif ($tabs) { } |
|
67
|
0 |
10 |
if $indent_pp |
|
68
|
0 |
10 |
if $no_indent_pp |
|
69
|
0 |
10 |
if (defined $range) |
|
70
|
0 |
0 |
if ($range =~ /^(\d+),(\d+)$/) { } |
|
80
|
7 |
3 |
if (@ARGV) { } |
|
82
|
0 |
7 |
if (-d $arg) { } |
|
98
|
0 |
0 |
if defined $lang |
|
99
|
0 |
0 |
if $fix |
|
100
|
0 |
0 |
if $diff |
|
101
|
0 |
0 |
if (defined $spaces) { } |
|
|
0 |
0 |
elsif ($tabs) { } |
|
108
|
0 |
0 |
if $indent_pp |
|
109
|
0 |
0 |
if $no_indent_pp |
|
110
|
0 |
0 |
if (@exclude) |
|
113
|
0 |
0 |
if (@include) |
|
119
|
0 |
0 |
if ($check) { } |
|
|
0 |
0 |
elsif ($diff) { } |
|
121
|
0 |
0 |
if ($c->{'status'} eq "needs_fixing") |
|
128
|
0 |
0 |
if ($c->{'diff'}) |
|
134
|
0 |
0 |
if ($verbose or not $check || $diff || $fix) |
|
136
|
0 |
0 |
$c->{'lang'} ? : |
|
137
|
0 |
0 |
if ($c->{'status'} eq 'skipped') { } |
|
|
0 |
0 |
elsif ($c->{'status'} eq 'error') { } |
|
|
0 |
0 |
elsif ($c->{'status'} eq 'changed') { } |
|
|
0 |
0 |
elsif ($c->{'status'} eq 'needs_fixing') { } |
|
|
0 |
0 |
elsif ($c->{'status'} eq 'unchanged') { } |
|
138
|
0 |
0 |
if $verbose |
|
147
|
0 |
0 |
if $verbose |
|
153
|
0 |
0 |
if $verbose or not $check || $diff || $fix |
|
160
|
0 |
7 |
unless open my $fh, "<", $file |
|
167
|
3 |
4 |
if ($check) |
|
168
|
2 |
1 |
if ($result ne $src) |
|
175
|
2 |
2 |
if ($diff) |
|
176
|
1 |
1 |
if ($result ne $src) |
|
182
|
1 |
1 |
if ($fix) |
|
183
|
1 |
0 |
if ($result ne $src) |
|
184
|
0 |
1 |
unless open my $out, ">", $file |
|
200
|
0 |
3 |
if ($check) |
|
201
|
0 |
0 |
if $result ne $src |
|
205
|
0 |
3 |
if ($diff) |
|
206
|
0 |
0 |
if $result ne $src |
|
222
|
0 |
1 |
@old_lines > @new_lines ? : |
|
228
|
3 |
1 |
$i < @old_lines ? : |
|
229
|
3 |
1 |
$i < @new_lines ? : |
|
232
|
2 |
2 |
if (not $same and $hunk_start < 0) |
|
238
|
2 |
2 |
if ($hunk_start >= 0 and not $same) |
|
239
|
1 |
1 |
if defined $ol |
|
240
|
1 |
1 |
if defined $nl |
|
243
|
3 |
1 |
if ($same or $i == $max) |
|
244
|
2 |
1 |
if ($hunk_start >= 0) |
|
251
|
0 |
1 |
unless $l =~ /\n$/ |
|
255
|
0 |
1 |
unless $l =~ /\n$/ |