| line |
true |
false |
branch |
|
26
|
0 |
471 |
if $id =~ m[/] |
|
58
|
0 |
251 |
unless $self->file_name =~ /%s/ |
|
60
|
0 |
251 |
unless (-d $self->directory) |
|
62
|
0 |
0 |
unless (File::Path::mkpath($self->directory)) |
|
93
|
5 |
132 |
unless -e $file_path |
|
97
|
0 |
132 |
if (-l $file_path) |
|
99
|
0 |
0 |
$self->debug ? : |
|
|
0 |
0 |
unless unlink $file_path |
|
106
|
0 |
0 |
$self->debug ? : |
|
|
0 |
132 |
unless sysopen $fh, $file_path, $mode, $self->umask |
|
110
|
0 |
132 |
if -l $file_path |
|
112
|
132 |
0 |
unless ($self->no_flock) |
|
114
|
0 |
0 |
$self->debug ? : |
|
|
0 |
132 |
unless flock $fh, 2 |
|
124
|
0 |
0 |
$self->debug ? : |
|
|
0 |
132 |
unless close $fh |
|
140
|
0 |
92 |
if (-l $file_path) |
|
142
|
0 |
0 |
$self->debug ? : |
|
|
0 |
0 |
unless unlink $file_path |
|
145
|
10 |
82 |
-e $file_path ? : |
|
149
|
0 |
0 |
$self->debug ? : |
|
|
0 |
92 |
unless sysopen $fh, $file_path, $mode, $self->umask |
|
153
|
0 |
92 |
if -l $file_path |
|
155
|
92 |
0 |
unless ($self->no_flock) |
|
157
|
0 |
0 |
$self->debug ? : |
|
|
0 |
92 |
unless flock $fh, 2 |
|
160
|
0 |
0 |
$self->debug ? : |
|
|
0 |
92 |
unless seek $fh, 0, 0 |
|
161
|
0 |
0 |
$self->debug ? : |
|
|
0 |
92 |
unless truncate $fh, 0 |
|
163
|
0 |
0 |
$self->debug ? : |
|
|
0 |
92 |
unless close $fh |
|
175
|
0 |
1 |
if (not $sub or ref $sub ne 'CODE') |
|
185
|
0 |
0 |
$self->debug ? : |
|
|
0 |
1 |
unless opendir INX, $self->directory |
|
195
|
2 |
4 |
if $entry =~ /^\.\.?/ or -d $entry |
|
197
|
4 |
0 |
if $entry =~ /$pattern/ |
|
200
|
0 |
0 |
$self->debug ? : |
|
|
0 |
1 |
unless closedir INX |