| blib/lib/Data/ULID.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 26 | 57.6 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 0 | unless &HAS_DATETIME() |
| 42 | 0 | 0 | unless $ulid |
| 50 | 0 | 1 | unless my $ulid = shift() |
| 56 | 0 | 3 | unless my $uuid = shift() |
| 66 | 0 | 1 | if length $uuid == 36 |
| 67 | 0 | 1 | unless length $uuid == 16 |
| 80 | 0 | 3 | if length $uuid == 16 |
| 90 | 11 | 1 | if ($arg) |
| 91 | 0 | 11 | if (ref $arg and $arg->isa('DateTime')) { } |
| 6 | 5 | elsif (length $arg == 16) { } | |
| 99 | 0 | 5 | unless length $arg == 26 |
| 159 | 22 | 12 | if $padded == 0 |
| 164 | 10 | 2 | if $padding eq $_[1] x $padded |