line |
true |
false |
branch |
47
|
11 |
171 |
unless my $ref = ref $item |
48
|
166 |
5 |
if ($ref eq 'ARRAY') { } |
|
0 |
5 |
elsif ($ref eq 'HASH') { } |
|
5 |
0 |
elsif (eval {
do {
$item->can('clone')
}
}) { } |
77
|
0 |
3 |
if ($rev) |
78
|
0 |
0 |
if $action eq 'append' |
153
|
3 |
2 |
defined $base ? : |
168
|
0 |
0 |
unless my $base = shift() |
183
|
2 |
1 |
unless $self->l |
185
|
0 |
1 |
if $to->is_absolute |
224
|
0 |
2 |
unless @_ |
226
|
0 |
2 |
@_ ? : |
227
|
2 |
0 |
if ($self->is_dir) |
230
|
1 |
1 |
unless CORE::utime $at, $mt, $self |
244
|
0 |
1 |
unless CORE::chmod $mode, "$self" |
261
|
0 |
2 |
unless CORE::rename $self, $name |
279
|
1 |
3 |
unless my $st = &File::stat::stat("$self") |
296
|
2 |
1 |
if ($self->is_dir and $self->l) |
299
|
0 |
3 |
unless my $st = &File::stat::lstat("$self") |
317
|
0 |
0 |
unless (ref $other) |
318
|
0 |
0 |
$self->is_file && $other =~ m[/$] ? : |
322
|
0 |
0 |
if $self eq $other |
323
|
0 |
0 |
if $self->is_dir != $other->is_dir |
329
|
0 |
0 |
unless $s1 and $s2 |