line |
true |
false |
branch |
27
|
35 |
192 |
if (ref $_[0] eq 'Path::Extended::Tiny') { } |
29
|
35 |
0 |
if (@_) |
31
|
1 |
34 |
if ($new->is_absolute) { } |
55
|
18 |
17 |
-d $_[0]->_path ? : |
56
|
51 |
127 |
$_[0][1] || $_[0][2] ? : |
62
|
31 |
10 |
@_ == 1 ? : |
67
|
3 |
28 |
if $self->is_open |
68
|
26 |
5 |
if $self->exists |
70
|
113 |
46 |
-e $_[0]->_path ? : |
71
|
0 |
0 |
-w $_[0]->_path ? : |
72
|
0 |
0 |
-r $_[0]->_path ? : |
75
|
1 |
3 |
unless ($dest) |
77
|
0 |
3 |
unless File::Copy::Recursive::rcopy($self->_path, $dest) |
82
|
1 |
3 |
unless ($dest) |
83
|
1 |
2 |
if $self->is_open |
85
|
0 |
3 |
unless File::Copy::Recursive::rmove($self->_path, $dest) |
91
|
1 |
3 |
unless ($dest) |
92
|
1 |
2 |
if $self->is_open |
93
|
0 |
3 |
unless rename $self->_path, $dest |
104
|
0 |
2 |
$_[0] ? : |
|
2 |
0 |
if (@_) |
106
|
0 |
4 |
unless $$self[3] |
111
|
2 |
70 |
if $self->is_open |
112
|
22 |
50 |
if (-d $self->_path) { } |
113
|
0 |
22 |
unless opendir my $dh, $self->_path |
116
|
49 |
1 |
unless ($mode and $mode =~ /:/) |
119
|
1 |
49 |
unless CORE::open my $fh, $mode, $self->_path |
127
|
51 |
29 |
if ($$self[1]) |
131
|
22 |
58 |
if ($$self[2]) |
139
|
1 |
97 |
if ($$self[1]) |
140
|
95 |
2 |
if ($$self[2]) |
144
|
1 |
3 |
if ($$self[1]) |
145
|
1 |
2 |
if ($$self[2]) |
149
|
1 |
7 |
if ($$self[1]) |
150
|
5 |
2 |
if ($$self[2]) |
154
|
0 |
4 |
if $self->is_open |
155
|
0 |
4 |
unless $self->exists |
156
|
4 |
0 |
if (-d $self->_path) { } |
|
0 |
0 |
elsif (-f $self->_path) { } |
158
|
0 |
4 |
unless eval {
do {
File::Path::rmtree($self->_path, @args);
1
}
} |
175
|
1 |
1 |
if $self->is_open |
176
|
0 |
2 |
unless CORE::sysopen my $fh, $self->_path, @_ |
182
|
1 |
3 |
unless $$self[1] |
183
|
0 |
3 |
@_ ? : |
196
|
64 |
9 |
if $$self[1] |
204
|
1 |
1 |
if $$self[1] |
210
|
1 |
1 |
if $$self[1] |
215
|
1 |
1 |
if $$self[1] |
223
|
0 |
12 |
unless ($self->is_open) |
226
|
1 |
11 |
if $$opts{'binmode'} |
234
|
1 |
11 |
if ($$opts{'chomp'}) |
237
|
2 |
10 |
if ($$opts{'decode'}) |
243
|
2 |
10 |
if ($$opts{'callback'}) |
247
|
2 |
10 |
if (my $rule = $$opts{'filter'}) |
250
|
0 |
12 |
unless defined wantarray |
253
|
5 |
1 |
unless (@callbacks or $filter or wantarray) |
262
|
3 |
12 |
if $filter and not $line =~ /$filter/ |
263
|
12 |
0 |
unless $$opts{'ignore_return_value'} |
266
|
5 |
2 |
wantarray ? : |
280
|
4 |
23 |
if ($$opts{'mkdir'}) |
283
|
0 |
27 |
$$opts{'mode'} || $$opts{'append'} ? : |
285
|
0 |
27 |
unless ($self->is_open) |
288
|
0 |
27 |
if ($$opts{'lock'} and not $self->lock_ex) |
291
|
1 |
26 |
if $$opts{'binmode'} |
299
|
2 |
25 |
if ($$opts{'encode'}) |
305
|
2 |
25 |
if ($$opts{'callback'}) |
311
|
0 |
27 |
ref $content eq 'ARRAY' ? : |
315
|
1 |
26 |
if ($$opts{'mtime'}) |
323
|
1 |
23 |
unless $self->exists |
329
|
1 |
4 |
unless $self->exists |
330
|
2 |
2 |
if (@_) { } |
341
|
23 |
1 |
unless ($self->exists) |
343
|
0 |
23 |
unless eval {
do {
File::Path::mkpath($self->_path);
1
}
} |
350
|
1 |
1 |
if $_[0][2] |
360
|
4 |
8 |
$is_dir ? : |
|
2 |
10 |
unless $is_dir ? -d $path : -f $path |
362
|
2 |
8 |
unless $relpath =~ /$rule/ |
363
|
0 |
8 |
if $relpath =~ m[/\.] |
366
|
2 |
5 |
if ($opts{'callback'}) |
373
|
0 |
16 |
if $self->is_open |
374
|
15 |
1 |
if ($self->exists and -d $self->_path) |
376
|
0 |
15 |
unless eval {
do {
File::Path::rmtree($self->_path, @args);
1
}
} |
385
|
1 |
4 |
unless $self->is_open |
387
|
1 |
4 |
unless (defined $next) |
395
|
0 |
18 |
unless $self->open |
398
|
36 |
33 |
if not $opts{'all'} and $path eq '.' || $path eq '..' |
400
|
25 |
8 |
if ($opts{'prune'} or $opts{'no_hidden'}) |
401
|
0 |
25 |
if (ref $opts{'prune'} eq ref qr//) { } |
|
0 |
25 |
elsif (ref $opts{'prune'} eq ref sub {
}
) { } |
402
|
0 |
0 |
if $path =~ /$opts{'prune'}/ |
405
|
0 |
0 |
if $opts{'prune'}(_new($child)) |
408
|
3 |
22 |
if $path =~ /^\./ |
423
|
1 |
4 |
@_ == 1 && ref $_[0] eq ref sub {
}
? : |
425
|
0 |
5 |
unless my $callback = $opts{'callback'} |
447
|
3 |
1 |
$opts{'preorder'} ? : |
|
1 |
4 |
$opts{'depthfirst'} && $opts{'preorder'} ? : |
451
|
18 |
17 |
if ($entry->is_dir) { } |
470
|
4 |
37 |
@_ == 1 && ref $_[0] eq ref {} ? : |
473
|
0 |
0 |
if $AUTOLOAD =~ /::DESTROY$/ |
477
|
0 |
0 |
if (ref $self) { } |