| line |
true |
false |
branch |
|
50
|
1 |
5 |
unless ($found{$file}{$last_dir}) |
|
58
|
1 |
5 |
if (not $found{$file}{$dir}) { } |
|
|
1 |
4 |
elsif (not -e $found{$file}{$last_dir}{'name'}) { } |
|
|
1 |
3 |
elsif (my $diff = eval {
do {
$self->dodiff('' . path($last_dir, $file), '' . path($dir, $file))
}
}) { } |
|
73
|
0 |
6 |
if $@ |
|
77
|
3 |
3 |
unless ($diff_count) |
|
94
|
20 |
0 |
if ($dir ne '.') |
|
114
|
6 |
28 |
if $file->basename =~ /^[.].*[.]sw[n-z]$|^[.](?:svn|bzr|git)$|CVS|RCS$|cover_db|_build|Build$|blib/ |
|
115
|
1 |
27 |
if $self->{'exclude'} and grep {$file =~ /$_/;} @{$$self{'exclude'};} |
|
119
|
6 |
21 |
if (-d $file) |
|
131
|
1 |
3 |
unless ($which_diff) |
|
132
|
0 |
1 |
$self->ignore_space_change || $self->ignore_all_space ? : |
|
137
|
0 |
4 |
if ($which_diff eq 'mydiff') { } |
|
142
|
1 |
3 |
if $diff |
|
151
|
0 |
0 |
if not $self->follow and -l $file1 || -l $file2 |
|
157
|
0 |
0 |
if ($self->ignore_space_change) |
|
160
|
0 |
0 |
if ($self->ignore_all_space) |
|
164
|
0 |
0 |
$self->fast ? : |
|
|
0 |
0 |
-s $file1 != -s $file2 ? : |
|
169
|
0 |
0 |
if ($diff) |
|
170
|
0 |
0 |
if $self->verbose |
|
180
|
0 |
0 |
if ($text =~ /[\s$|><;#]/msx) |