| line |
true |
false |
branch |
|
13
|
0 |
7 |
unless @_ <= 1 |
|
|
0 |
7 |
unless @_ >= 1 |
|
27
|
0 |
2 |
unless @_ <= 2 |
|
|
0 |
2 |
unless @_ >= 2 |
|
32
|
0 |
568 |
unless @_ <= 2 |
|
|
0 |
568 |
unless @_ >= 2 |
|
36
|
0 |
78 |
unless @_ <= 2 |
|
|
0 |
78 |
unless @_ >= 2 |
|
41
|
0 |
14 |
unless @_ <= 3 |
|
|
0 |
14 |
unless @_ >= 2 |
|
43
|
1 |
13 |
defined $perm ? : |
|
|
2 |
12 |
unless &CORE::mkdir($real, defined $perm ? $perm : ()) |
|
46
|
0 |
72 |
unless @_ <= 3 |
|
|
0 |
72 |
unless @_ >= 2 |
|
49
|
0 |
72 |
if defined $perms |
|
51
|
1 |
71 |
if @$err |
|
54
|
0 |
7 |
unless @_ <= 3 |
|
|
0 |
7 |
unless @_ >= 3 |
|
55
|
2 |
5 |
unless CORE::symlink $self->path2real($to_path), $self->path2real($link_path) |
|
59
|
0 |
3 |
unless @_ <= 3 |
|
|
0 |
3 |
unless @_ >= 3 |
|
60
|
0 |
3 |
unless CORE::link $self->path2real($to_path), $self->path2real($link_path) |
|
64
|
0 |
4 |
unless @_ <= 2 |
|
|
0 |
4 |
unless @_ >= 2 |
|
69
|
0 |
2 |
unless @_ <= 4 |
|
|
0 |
2 |
unless @_ >= 2 |
|
71
|
1 |
1 |
unless utime $atime // undef, $mtime // undef, $real |
|
74
|
0 |
55 |
unless @_ <= 2 |
|
|
0 |
55 |
unless @_ >= 2 |
|
78
|
0 |
143 |
unless @_ <= 2 |
|
|
0 |
143 |
unless @_ >= 2 |
|
80
|
2 |
141 |
unless my(@stat) = &Time::HiRes::stat(scalar $self->path2real($path)) |
|
85
|
0 |
1 |
unless @_ <= 3 |
|
|
0 |
1 |
unless @_ >= 3 |
|
86
|
0 |
1 |
unless CORE::rename $self->path2real($old), $self->path2real($new) |
|
108
|
0 |
129 |
unless @_ >= 4 |
|
109
|
1 |
128 |
unless exists $open_map{$_[3]} |
|
110
|
2 |
126 |
defined $_[4] ? : |
|
|
9 |
119 |
unless &CORE::sysopen($_[1], $_[0]->path2real($_[2]), $open_map{$_[3]}, defined $_[4] ? $_[4] : ()) |
|
115
|
0 |
13 |
unless @_ <= 4 |
|
|
0 |
13 |
unless @_ >= 3 |
|
|
3 |
10 |
@_ >= 4 ? : |
|
116
|
1 |
12 |
unless exists $seek_map{$whence} |
|
120
|
0 |
73 |
unless @_ >= 3 |
|
125
|
0 |
49 |
unless @_ >= 4 |
|
130
|
0 |
31 |
unless @_ <= 2 |
|
|
0 |
31 |
unless @_ >= 2 |
|
131
|
1 |
30 |
unless CORE::unlink $self->path2real($path) |
|
134
|
0 |
7 |
unless @_ <= 3 |
|
|
0 |
7 |
unless @_ >= 2 |
|
|
1 |
6 |
@_ >= 3 ? : |
|
136
|
0 |
6 |
unless $self->stat($path)->is_dir |
|
138
|
0 |
6 |
if @$err |
|
141
|
0 |
43 |
unless @_ <= 2 |
|
|
0 |
43 |
unless @_ >= 2 |
|
143
|
1 |
42 |
unless opendir my $dh, $real |
|
144
|
107 |
42 |
if $_ ne '.' |
|
158
|
0 |
112 |
unless @_ <= 3 |
|
|
0 |
112 |
unless @_ >= 3 |
|
159
|
1 |
111 |
unless exists $flock_map{$flag} |
|
161
|
1 |
1 |
unless $res or $! == 11 or $! == 11 |
|
165
|
0 |
62 |
unless @_ >= 3 |
|
166
|
62 |
0 |
unless $mode eq 'r' and $mode eq 'r+' |
|
172
|
0 |
2 |
unless @_ <= 3 |
|
|
0 |
2 |
unless @_ >= 3 |
|
182
|
0 |
39 |
unless @_ <= 3 |
|
|
0 |
39 |
unless @_ >= 3 |
|
191
|
0 |
18 |
unless @_ <= 2 |
|
|
0 |
18 |
unless @_ >= 2 |
|
200
|
0 |
17 |
unless @_ <= 2 |
|
|
0 |
17 |
unless @_ >= 2 |
|
204
|
0 |
10 |
unless @_ >= 1 |
|
|
0 |
10 |
unless @_ & 1 |
|
209
|
0 |
3 |
unless @_ <= 4 |
|
|
0 |
3 |
unless @_ >= 3 |
|
211
|
0 |
15 |
unless @_ <= 1 |
|
|
0 |
15 |
unless @_ >= 1 |
|
213
|
9 |
6 |
unless $stat->is_file |
|
220
|
0 |
12 |
unless @_ <= 4 |
|
|
0 |
12 |
unless @_ >= 3 |
|
222
|
10 |
2 |
unless ref $start eq 'ARRAY' |
|
229
|
1 |
14 |
$seen_dirs{join $;, $stat->dev, '-', $stat->ino}++ ? : |
|
239
|
1 |
62 |
unless $self->exists($path) |
|
250
|
27 |
35 |
if $bool |
|
251
|
57 |
5 |
unless $seen_children{join $;, $stat->dev, '-', $stat->ino}++ |
|
259
|
0 |
8 |
unless @_ <= 3 |
|
|
0 |
8 |
unless @_ >= 3 |
|
260
|
0 |
8 |
unless File::Copy::cp($self->path2real($from), $self->path2real($to)) |
|
263
|
0 |
4 |
unless @_ <= 3 |
|
|
0 |
4 |
unless @_ >= 3 |
|
271
|
0 |
12 |
unless @_ <= 1 |
|
|
0 |
12 |
unless @_ >= 1 |
|
274
|
5 |
7 |
if ($stat->is_dir) { } |
|
|
7 |
0 |
elsif ($stat->is_file) { } |
|
275
|
4 |
1 |
unless $self->exists($dest) |
|
287
|
0 |
1 |
unless @_ <= 3 |
|
|
0 |
1 |
unless @_ >= 3 |