| blib/lib/Data/CompactReadonly.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 197 | 0 | 59 | unless open my $fh, ">:unix", $file |
| 208 | 4 | 55 | if ($@ and index($@, "Data::CompactReadonly::V${version}::Node"->_ptr_blown) != -1) { } |
| 0 | 55 | elsif ($@) { } | |
| 218 | 58 | 58 | if (ref $file) { } |
| 221 | 2 | 56 | if (grep {not $_ =~ /^(unix|perlio|scalar)$/;} @layers) |
| 229 | 1 | 57 | unless open $fh, "<", $file |
| 237 | 1 | 112 | unless defined $byte5 |
| 241 | 1 | 111 | if $version == 31 |
| 248 | 7 | 215 | exists $args{$_} ? : |