| blib/lib/Business/BancaSella/Ric/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 28 | 42.8 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 1 | unless defined $$self{$_} |
| 52 | 0 | 1 | unless open REQUEST, "+<$$self{'file'}" |
| 59 | 0 | 1 | if ($@) { } |
| 0 | 1 | elsif (not $has_lock) { } | |
| 69 | 0 | 1 | unless ($size_bytes = (stat REQUEST)[7]) |
| 70 | 0 | 0 | $! ? : |
| 72 | 0 | 1 | if ($size_bytes % $row_length != 0) |
| 81 | 0 | 1 | unless seek REQUEST, ($size - 1) * $row_length, 0 |
| 84 | 0 | 1 | unless read REQUEST, $row, $row_length |
| 86 | 0 | 1 | unless ($row =~ /^([a-zA-Z0-9]{32})\n$/) |
| 93 | 0 | 1 | if ($@) |
| 96 | 0 | 1 | unless ($is_truncate) |
| 107 | 0 | 1 | if $error |
| 118 | 0 | 0 | @_ ? : |