| lib/Petal/Cache/Disk.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 26 | 26.9 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 0 | if $Petal::INPUT |
| 45 | 0 | 4 | if $class->is_ok($file, $lang) |
| 62 | 4 | 0 | if ($] > 5.007) { } |
| 64 | 0 | 4 | unless open FP, '>:utf8', "$tmp/$key" |
| 68 | 0 | 0 | unless open FP, ">$tmp/$key" |
| 89 | 4 | 0 | unless -e $tmp_file |
| 109 | 12 | 0 | if defined $PREFIX |
| 155 | 0 | 0 | unless -e $cached_filepath |
| 159 | 0 | 0 | if ($] > 5.007) { } |
| 161 | 0 | 0 | unless open FP, '<:utf8', "$tmp/$key" |
| 165 | 0 | 0 | unless open FP, "<$tmp/$key" |
| 184 | 0 | 8 | unless -e $TMP_DIR |
| 185 | 0 | 8 | unless -d $TMP_DIR |