| line |
true |
false |
branch |
| 79 |
0 |
60 |
unless my $key = $self->_get_key_for_unique_key($p_namespace, $unique_key) |
| 109 |
119 |
0 |
if (-e $self->_path_to_key($p_namespace, $p_key)) { } |
| 214 |
43 |
0 |
if defined $p_optional_new_umask |
| 216 |
43 |
0 |
if defined $p_optional_new_umask |
| 224 |
0 |
43 |
unless -d $directory |
| 227 |
43 |
0 |
if defined $old_umask |
| 241 |
72 |
32 |
if $dirent eq '.' or $dirent eq '..' |
| 245 |
0 |
32 |
unless -d $path |
| 260 |
0 |
429 |
unless -d $p_directory |
| 265 |
0 |
429 |
unless opendir Dir, _Untaint_Path($p_directory) |
| 270 |
0 |
429 |
unless closedir Dir |
| 287 |
0 |
151 |
unless open File, _Untaint_Path($p_path) |
| 313 |
26 |
151 |
unless -e $p_path |
| 335 |
57 |
0 |
if (-f _Untaint_Path($p_path)) |
| 353 |
152 |
0 |
if (-d _Untaint_Path($p_directory)) |
| 369 |
8 |
241 |
unless -d $p_directory |
| 373 |
482 |
264 |
if $dirent eq '.' or $dirent eq '..' |
| 377 |
204 |
60 |
if (-d $path) { } |
| 397 |
0 |
0 |
if $dirent eq '.' or $dirent eq '..' |
| 401 |
0 |
0 |
if (-d $path) { } |
| 420 |
1 |
152 |
unless -d $p_root |
| 424 |
304 |
158 |
if $dirent eq '.' or $dirent eq '..' |
| 428 |
128 |
30 |
if (-d $path) { } |
| 452 |
0 |
0 |
unless -d $p_directory |
| 458 |
0 |
0 |
if $dirent eq '.' or $dirent eq '..' |
| 462 |
0 |
0 |
if (-d $path) { } |
| 497 |
0 |
1697 |
if (not defined $untainted_string || $untainted_string ne $p_string) |
| 515 |
86 |
0 |
if (defined $directory and defined $volume) |
| 520 |
43 |
43 |
if (defined $directory and not -d $directory) |
| 556 |
0 |
86 |
if $p_optional_umask |
| 558 |
0 |
86 |
if $p_optional_umask |
| 562 |
86 |
0 |
if (defined $directory and defined $volume) |
| 575 |
0 |
86 |
unless -e $temp_filename |
| 578 |
0 |
86 |
unless rename $temp_filename, _Untaint_Path($p_path) |
| 581 |
0 |
86 |
if (-e $temp_filename) |
| 591 |
0 |
86 |
if $old_umask |
| 652 |
26 |
151 |
unless my $frozen_data_ref = _Read_File_Without_Time_Modification($p_path) |
| 657 |
0 |
151 |
if ($@ or ref $data_ref ne 'ARRAY') { } |