| blib/lib/Test2/Util/UUID.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 21 | 61.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 149 | 3 | 0 | 61 | $UG and $UG_PID |
| 3 | 0 | 61 | $UG and $UG_PID and $UG_PID == $$ | |
| 167 | 0 | 0 | 40 | $in and $in =~ /^[A-F0-9]{8}-[A-F0-9]{4}-[A-F0-9]{4}-[A-F0-9]{4}-[A-F0-9]{12}$/i |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 30 | 4 | 4 | 0 | $arg eq "warn" or $arg eq "backends" |
| 41 | 16 | 5 | 0 | $subs->{$name} || $class->can($name) |
| 58 | 12 | 5 | 0 | $params{'warn'} // ($ENV{'TEST2_UUID_NO_WARN'} ? 0 : 1) |
| 59 | 16 | 1 | 0 | $params{'backends'} // ($ENV{'TEST2_UUID_BACKEND'} ? [split(/\s*,\s*/, $ENV{'TEST2_UUID_BACKEND'}, 0)] : ["UUID", "Data::UUID::MT", "UUID::Tiny", "Data::UUID"]) |