| line |
true |
false |
branch |
|
53
|
0 |
0 |
if (/Can\'t locate .* in \@INC/ and not /Compilation failed/) { } |
|
76
|
0 |
0 |
unless opendir DIRH, $dir |
|
77
|
0 |
0 |
if $_ ne '.' |
|
87
|
0 |
0 |
unless (sysopen $read_fh, $file, $Fetch_Flags) |
|
93
|
0 |
0 |
if (defined $read_cnt) { } |
|
94
|
0 |
0 |
if $read_cnt == 0 |
|
96
|
0 |
0 |
if $size_left <= 0 |
|
107
|
0 |
0 |
unless defined $file_create_mode |
|
113
|
0 |
0 |
unless (sysopen $write_fh, $file, $Store_Flags, $file_create_mode) |
|
121
|
0 |
0 |
unless (defined $write_cnt) |
|
139
|
0 |
0 |
unless ($suffix and defined $uuid) |
|
174
|
0 |
0 |
if ($size =~ /^\d+b?$/) { } |
|
|
0 |
0 |
elsif (my($quantity, $unit) = $size =~ /^(\d+)\s*([km])b?$/i) { } |