Branch Coverage

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
158 22 12 if $padded == 0
162 10 2 if $padding eq $char x $padded