| line |
true |
false |
branch |
|
18
|
0 |
12 |
unless (defined $dir and -d $dir) |
|
22
|
0 |
12 |
unless (wantarray) |
|
26
|
0 |
12 |
unless chdir $dir |
|
27
|
0 |
12 |
unless opendir my $dh, "." |
|
30
|
24 |
16 |
if ($file eq "." or $file eq "..") |
|
33
|
12 |
4 |
if (-f $file) { } |
|
|
4 |
0 |
elsif (-d $file) { } |
|
47
|
0 |
12 |
unless closedir $dh |
|
48
|
0 |
12 |
unless chdir $original_dir |
|
49
|
0 |
12 |
if ($verbose) |
|
61
|
0 |
5 |
if (ref $ls_dir1_ref ne "HASH" or ref $ls_dir2_ref ne "HASH") |
|
70
|
5 |
8 |
unless ($ls_dir2_ref->{$d1e}) |
|
72
|
0 |
5 |
if ($verbose) |
|
77
|
0 |
5 |
unless (wantarray) |
|
86
|
0 |
4 |
if (ref $ls_dir1_ref ne "HASH" or ref $ls_dir2_ref ne "HASH") |
|
93
|
8 |
0 |
if ($ls_dir2_ref->{$file}) |
|
94
|
2 |
6 |
unless (-f $d1file) |
|
99
|
4 |
2 |
if (compare($d1file, $d2file) != 0) |
|
104
|
0 |
4 |
unless (wantarray) |
|
113
|
0 |
2 |
unless ($dir1 and $dir2) |
|
116
|
0 |
2 |
unless (-d $dir1) |
|
119
|
0 |
2 |
unless (-d $dir2) |
|
122
|
0 |
2 |
if ($verbose) |
|
125
|
0 |
2 |
unless ($callback_ref) |
|
128
|
0 |
2 |
if (ref $callback_ref ne "HASH") |
|
137
|
1 |
1 |
if ($d1cb) |
|
146
|
2 |
0 |
if ($d2cb) |
|
156
|
2 |
0 |
if ($diff_cb) |
|
163
|
0 |
2 |
if (defined wantarray) |