line |
true |
false |
branch |
67
|
0 |
21 |
$attr & 1 ? : |
|
0 |
21 |
$attr & 16 ? : |
74
|
4 |
7 |
S_ISREG($mode) ? : |
|
7 |
4 |
S_ISDIR($mode) ? : |
|
0 |
11 |
S_ISCHR($mode) ? : |
|
11 |
0 |
$mode & 128 ? : |
94
|
12 |
0 |
if ($root) |
95
|
0 |
12 |
unless -d $root |
97
|
1 |
11 |
$name eq '' ? : |
99
|
0 |
12 |
if $filename eq '' |
102
|
11 |
1 |
!$is_ipc && $filename && -e $filename ? : |
105
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat ? : |
|
0 |
1 |
$is_directory ? : |
|
11 |
1 |
@stat ? : |
|
11 |
1 |
@stat || $is_srv ? : |
134
|
0 |
0 |
$is_eof_first ? : |
135
|
0 |
0 |
$is_eof_first ? : |
137
|
0 |
0 |
$self->creation_time ? : |
143
|
4 |
0 |
$self->attributes & 16 ? : |
|
0 |
4 |
$self->is_ipc ? : |
179
|
17 |
0 |
if $openfile->handle |
198
|
1 |
2 |
unless -e $self->filename |
203
|
0 |
2 |
unless CORE::rename $filename, $tmp_filename |
206
|
0 |
2 |
unless ($openfile) |
207
|
0 |
0 |
unless CORE::rename $tmp_filename, $filename |
211
|
0 |
2 |
unless unlink $tmp_filename |
222
|
2 |
6 |
unless sysopen my $fh, $self->filename, &from_ntattr(scalar $self->attributes) |
231
|
1 |
0 |
-e $self->filename ? : |
|
1 |
7 |
unless sysopen my $fh, $self->filename, &from_ntattr(scalar $self->attributes) | 64 | 128 |
241
|
0 |
5 |
$^O eq 'MSWin32' ? : |
243
|
1 |
4 |
unless sysopen my $fh, $self->filename, &from_ntattr(scalar $self->attributes) | $mode |
246
|
0 |
4 |
if $^O eq 'MSWin32' |
254
|
3 |
1 |
-e $self->filename ? : |
260
|
2 |
1 |
-e $self->filename ? : |
267
|
0 |
6 |
if $self->is_ipc |
270
|
1 |
5 |
if $disposition == 0 |
271
|
1 |
4 |
if $disposition == 1 |
272
|
1 |
3 |
if $disposition == 2 |
273
|
1 |
2 |
if $disposition == 3 |
274
|
1 |
1 |
if $disposition == 4 |
275
|
1 |
0 |
if $disposition == 5 |
286
|
0 |
0 |
unless $root |
295
|
0 |
0 |
if $name =~ m[^\.\.?(/|$)] |
297
|
0 |
0 |
$name eq '' ? : |
304
|
0 |
4 |
unless $self->is_directory |
316
|
3 |
1 |
if (not $files or $start_idx == 0) |
317
|
10 |
0 |
if -e $_ |
319
|
10 |
0 |
$name eq '' ? : |
323
|
2 |
1 |
if $want_all |
326
|
1 |
3 |
$start_idx ? : |
332
|
0 |
0 |
if ($self->is_directory) { } |
348
|
0 |
0 |
unless $new_filename = $self->normalize_name_in_share($new_filename) |
350
|
0 |
0 |
unless -e $filename |
352
|
0 |
0 |
if -d $new_filename |
354
|
0 |
0 |
if not $replace and -e $new_filename |
357
|
0 |
0 |
unless CORE::rename $self->filename, $new_filename |