line |
true |
false |
branch |
26
|
35 |
192 |
if (ref $_[0] eq 'Path::Extended::Tiny') { } |
28
|
35 |
0 |
if (@_) |
30
|
1 |
34 |
if ($new->is_absolute) { } |
54
|
18 |
17 |
-d $_[0]->_path ? : |
55
|
51 |
127 |
$_[0][1] || $_[0][2] ? : |
61
|
31 |
10 |
@_ == 1 ? : |
66
|
3 |
28 |
if $self->is_open |
67
|
26 |
5 |
if $self->exists |
69
|
113 |
46 |
-e $_[0]->_path ? : |
70
|
0 |
0 |
-w $_[0]->_path ? : |
71
|
0 |
0 |
-r $_[0]->_path ? : |
74
|
1 |
3 |
unless ($dest) |
76
|
0 |
3 |
unless File::Copy::Recursive::rcopy($self->_path, $dest) |
81
|
1 |
3 |
unless ($dest) |
82
|
1 |
2 |
if $self->is_open |
84
|
0 |
3 |
unless File::Copy::Recursive::rmove($self->_path, $dest) |
90
|
1 |
3 |
unless ($dest) |
91
|
1 |
2 |
if $self->is_open |
92
|
0 |
3 |
unless rename $self->_path, $dest |
103
|
0 |
2 |
$_[0] ? : |
|
2 |
0 |
if (@_) |
105
|
0 |
4 |
unless $$self[3] |
110
|
2 |
70 |
if $self->is_open |
111
|
22 |
50 |
if (-d $self->_path) { } |
112
|
0 |
22 |
unless opendir my $dh, $self->_path |
115
|
49 |
1 |
unless ($mode and $mode =~ /:/) |
118
|
1 |
49 |
unless CORE::open my $fh, $mode, $self->_path |
126
|
51 |
29 |
if ($$self[1]) |
130
|
22 |
58 |
if ($$self[2]) |
138
|
1 |
97 |
if ($$self[1]) |
139
|
95 |
2 |
if ($$self[2]) |
143
|
1 |
3 |
if ($$self[1]) |
144
|
1 |
2 |
if ($$self[2]) |
148
|
1 |
7 |
if ($$self[1]) |
149
|
5 |
2 |
if ($$self[2]) |
153
|
0 |
4 |
if $self->is_open |
154
|
0 |
4 |
unless $self->exists |
155
|
4 |
0 |
if (-d $self->_path) { } |
|
0 |
0 |
elsif (-f $self->_path) { } |
157
|
0 |
4 |
unless eval {
do {
File::Path::rmtree($self->_path, @args);
1
}
} |
174
|
1 |
1 |
if $self->is_open |
175
|
0 |
2 |
unless CORE::sysopen my $fh, $self->_path, @_ |
181
|
1 |
3 |
unless $$self[1] |
182
|
0 |
3 |
@_ ? : |
195
|
64 |
9 |
if $$self[1] |
203
|
1 |
1 |
if $$self[1] |
209
|
1 |
1 |
if $$self[1] |
214
|
1 |
1 |
if $$self[1] |
222
|
0 |
12 |
unless ($self->is_open) |
225
|
1 |
11 |
if $$opts{'binmode'} |
233
|
1 |
11 |
if ($$opts{'chomp'}) |
236
|
2 |
10 |
if ($$opts{'decode'}) |
242
|
2 |
10 |
if ($$opts{'callback'}) |
246
|
2 |
10 |
if (my $rule = $$opts{'filter'}) |
249
|
0 |
12 |
unless defined wantarray |
252
|
5 |
1 |
unless (@callbacks or $filter or wantarray) |
261
|
3 |
12 |
if $filter and not $line =~ /$filter/ |
262
|
12 |
0 |
unless $$opts{'ignore_return_value'} |
265
|
5 |
2 |
wantarray ? : |
279
|
4 |
23 |
if ($$opts{'mkdir'}) |
282
|
0 |
27 |
$$opts{'mode'} || $$opts{'append'} ? : |
284
|
0 |
27 |
unless ($self->is_open) |
287
|
0 |
27 |
if ($$opts{'lock'} and not $self->lock_ex) |
290
|
1 |
26 |
if $$opts{'binmode'} |
298
|
2 |
25 |
if ($$opts{'encode'}) |
304
|
2 |
25 |
if ($$opts{'callback'}) |
310
|
0 |
27 |
ref $content eq 'ARRAY' ? : |
314
|
1 |
26 |
if ($$opts{'mtime'}) |
322
|
1 |
23 |
unless $self->exists |
328
|
1 |
4 |
unless $self->exists |
329
|
2 |
2 |
if (@_) { } |
340
|
23 |
1 |
unless ($self->exists) |
342
|
0 |
23 |
unless eval {
do {
File::Path::mkpath($self->_path);
1
}
} |
349
|
1 |
1 |
if $_[0][2] |
359
|
4 |
8 |
$is_dir ? : |
|
2 |
10 |
unless $is_dir ? -d $path : -f $path |
361
|
2 |
8 |
unless $relpath =~ /$rule/ |
362
|
0 |
8 |
if $relpath =~ m[/\.] |
365
|
2 |
5 |
if ($opts{'callback'}) |
372
|
0 |
16 |
if $self->is_open |
373
|
15 |
1 |
if ($self->exists and -d $self->_path) |
375
|
0 |
15 |
unless eval {
do {
File::Path::rmtree($self->_path, @args);
1
}
} |
384
|
1 |
4 |
unless $self->is_open |
386
|
1 |
4 |
unless (defined $next) |
394
|
0 |
18 |
unless $self->open |
397
|
36 |
33 |
if not $opts{'all'} and $path eq '.' || $path eq '..' |
399
|
25 |
8 |
if ($opts{'prune'} or $opts{'no_hidden'}) |
400
|
0 |
25 |
if (ref $opts{'prune'} eq ref qr//) { } |
|
0 |
25 |
elsif (ref $opts{'prune'} eq ref sub {
}
) { } |
401
|
0 |
0 |
if $path =~ /$opts{'prune'}/ |
404
|
0 |
0 |
if $opts{'prune'}(_new($child)) |
407
|
3 |
22 |
if $path =~ /^\./ |
422
|
1 |
4 |
@_ == 1 && ref $_[0] eq ref sub {
}
? : |
424
|
0 |
5 |
unless my $callback = $opts{'callback'} |
446
|
3 |
1 |
$opts{'preorder'} ? : |
|
1 |
4 |
$opts{'depthfirst'} && $opts{'preorder'} ? : |
450
|
18 |
17 |
if ($entry->is_dir) { } |
469
|
4 |
37 |
@_ == 1 && ref $_[0] eq ref {} ? : |
472
|
0 |
0 |
if $AUTOLOAD =~ /::DESTROY$/ |
476
|
0 |
0 |
if (ref $self) { } |