| line |
true |
false |
branch |
|
72
|
2 |
2 |
if -f $_ and $rel =~ /$re/u |
|
85
|
1 |
4 |
ref $_[0] eq 'HASH' ? : |
|
|
0 |
3 |
@_ % 2 ? : |
|
|
5 |
3 |
scalar @_ == 1 ? : |
|
105
|
4 |
12 |
unless -f $file and not -l $file |
|
110
|
2 |
10 |
if ($content = $self->inode->{$file->stat->ino}) { } |
|
125
|
2 |
10 |
if $self->has_file_callback |
|
129
|
2 |
10 |
if $done |
|
132
|
2 |
8 |
if (-e $content and $self->check_for_collisions) |
|
133
|
0 |
2 |
if -s $file != -s $content |
|
140
|
1 |
2 |
if $buf[0] ne $buf[1] |
|
147
|
2 |
7 |
-e $content ? : |
|
149
|
0 |
9 |
if $old eq $new |
|
151
|
0 |
9 |
unless link $old, $new |
|
154
|
8 |
1 |
if $self->make_read_only |
|
168
|
16 |
2 |
if -f $_ |
|
178
|
7 |
7 |
if (-d $path) { } |
|
|
1 |
6 |
elsif (-l $path) { } |
|
181
|
1 |
6 |
unless $path->children |
|
189
|
1 |
5 |
if $path->stat->nlink == 1 |
|
194
|
1 |
5 |
if $digest ne $path->relative($self->path) =~ s[/][]gru |