| blib/lib/STIX/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 18 | 33.3 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 0 | 3 | unless $id =~ /--/ |
| 35 | 0 | 1 | unless $object->can("STIX_OBJECT") |
| 44 | 0 | 1 | unless $object->can("STIX_OBJECT") |
| 53 | 0 | 1 | unless $object->can("STIX_OBJECT") |
| 62 | 0 | 0 | unless $object->can("MARKING_TYPE") |
| 71 | 0 | 9 | if (ref $file eq "GLOB") |
| 76 | 0 | 9 | unless open my $fh, "<", $file |
| 89 | 0 | 0 | if (ref $file eq 'GLOB') { } |
| 93 | 0 | 0 | unless open $fh, ">", $file |