| blib/lib/Data/GUID.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 20 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 85 | 39 | 2 | defined $value ? : |
| 86 | 6 | 35 | if $length != 16 |
| 132 | 57 | 16 | unless $string =~ /$regex/ |
| 165 | 2 | 28 | if eval { do { $value->isa("Data::GUID") } } |
| 167 | 24 | 4 | defined $value ? : |
| 170 | 4 | 24 | if (my $ref = ref $value) |
| 177 | 12 | 51 | if $guid |
| 263 | 6 | 2 | eval { do { $other->isa('Data::GUID') } } ? : |
| 283 | 1 | 5 | $_[2] ? : |
| 343 | 2 | 12 | $eval ? : |