| line |
true |
false |
branch |
|
26
|
0 |
39 |
unless (-f $path and -r _) |
|
34
|
0 |
39 |
if ($size > $MAX_FILE_SIZE) |
|
41
|
0 |
39 |
unless (open my $fh, "<", $path) |
|
50
|
39 |
0 |
if (length $src > 0) |
|
52
|
1 |
38 |
if ($sample =~ /\0/) |
|
61
|
2 |
36 |
unless (defined $lang) |
|
70
|
0 |
180 |
if exists $opts{$k} |
|
76
|
2 |
34 |
if ($fixed eq $src) { } |
|
79
|
12 |
22 |
$opts{'fix'} ? : |
|
80
|
12 |
22 |
if ($opts{'fix'}) |
|
81
|
0 |
12 |
unless (open my $out, ">", $path) |
|
89
|
1 |
33 |
if $opts{'diff'} |
|
98
|
1 |
15 |
exists $opts{'recursive'} ? : |
|
104
|
0 |
16 |
if (-f $path) { } |
|
|
16 |
0 |
elsif (-d $path) { } |
|
107
|
15 |
1 |
if ($recursive) { } |
|
110
|
23 |
45 |
unless -f $_ |
|
111
|
0 |
45 |
if -l $File::Find::dir and $File::Find::dir ne $path |
|
118
|
0 |
1 |
unless opendir my $dh, $path |
|
120
|
2 |
2 |
if $entry =~ /^\./ |
|
122
|
1 |
1 |
if -f $full |
|
142
|
12 |
34 |
if (defined $exclude) |
|
143
|
4 |
8 |
ref $exclude eq 'ARRAY' ? : |
|
146
|
4 |
11 |
if ($file =~ /$pat/) |
|
148
|
4 |
8 |
if ($skip) |
|
156
|
7 |
35 |
if (defined $include) |
|
157
|
0 |
7 |
ref $include eq 'ARRAY' ? : |
|
160
|
4 |
3 |
if ($file =~ /$pat/) |
|
162
|
3 |
4 |
unless ($match) |
|
172
|
34 |
5 |
if ($result->{'status'} eq 'changed' or $result->{'status'} eq 'needs_fixing') { } |
|
|
2 |
3 |
elsif ($result->{'status'} eq 'unchanged') { } |
|
|
3 |
0 |
elsif ($result->{'status'} eq 'skipped') { } |
|
|
0 |
0 |
elsif ($result->{'status'} eq 'error') { } |
|
192
|
0 |
1 |
@old_lines > @new_lines ? : |
|
197
|
3 |
1 |
$i < @old_lines ? : |
|
198
|
3 |
1 |
$i < @new_lines ? : |
|
201
|
2 |
2 |
if (not $same and $hunk_start < 0) |
|
206
|
2 |
2 |
if ($hunk_start >= 0 and not $same) |
|
207
|
1 |
1 |
if defined $ol |
|
208
|
1 |
1 |
if defined $nl |
|
210
|
3 |
1 |
if ($same or $i == $max) |
|
211
|
2 |
1 |
if ($hunk_start >= 0) |
|
216
|
0 |
1 |
unless $l =~ /\n$/ |
|
220
|
0 |
1 |
unless $l =~ /\n$/ |