Branch Coverage

blib/lib/Data/ULID.pm
Criterion Covered Total %
branch 15 26 57.6


line true false branch
43 0 0 unless &HAS_DATETIME()
44 0 0 unless $ulid
52 0 1 unless my $ulid = shift()
58 0 3 unless my $uuid = shift()
68 0 1 if length $uuid == 36
69 0 1 unless length $uuid == 16
82 0 3 if length $uuid == 16
92 11 1 if ($arg)
93 0 11 if (ref $arg and $arg->isa('DateTime')) { }
6 5 elsif (length $arg == 16) { }
101 0 5 unless length $arg == 26
161 22 12 if $padded == 0
166 10 2 if $padding eq $_[1] x $padded