Branch Coverage

blib/lib/UUID.pm
Criterion Covered Total %
branch 13 14 92.8


line true false branch
34 7 248 if (length $v > 8 and substr($v, 0, 8) eq ":persist")
36 0 7 if (length $arg < 2 or substr($arg, 0, 1) ne "=")
45 8 240 if (length $v == 11 and $v eq ":mac=random")
51 2 238 if (length $v == 11 and $v eq ":mac=unique")
57 6 232 if (length $v >= 6 and substr($v, 0, 6) eq ":defer")
60 1 5 if ($len == 0) { }
1 4 elsif ($len == 1 or substr($arg, 0, 1) ne '=') { }