| line |
true |
false |
branch |
|
97
|
0 |
3 |
if scalar @opts |
|
108
|
0 |
9 |
if scalar @opts |
|
111
|
0 |
9 |
unless eval {
do {
$identifier->isa("Data::Identifier")
}
} |
|
113
|
6 |
3 |
if ($template =~ /^(sid|sni|hdi|udi)([1-9][0-9]*)$/u) { } |
|
|
0 |
3 |
elsif ($template eq '4+12') { } |
|
|
1 |
2 |
elsif ($template eq 'uuid128') { } |
|
|
1 |
1 |
elsif ($template eq 'uuidhexdash') { } |
|
|
1 |
0 |
elsif ($template eq 'uuidHEXDASH') { } |
|
118
|
2 |
4 |
if ($bits == 8) { } |
|
|
2 |
2 |
elsif ($bits == 16) { } |
|
|
2 |
0 |
elsif ($bits == 32) { } |
|
132
|
0 |
0 |
if (defined $v) |
|
133
|
0 |
0 |
if ($v < 0 or $v > 4095) |
|
149
|
6 |
0 |
if (defined $v and defined $pack_template) |
|
152
|
2 |
4 |
if ($pack_template eq 'C') { } |
|
|
2 |
2 |
elsif ($pack_template eq 'n') { } |
|
|
2 |
0 |
elsif ($pack_template eq 'N') { } |
|
160
|
0 |
6 |
if (defined $min and $v < $min or defined $max and $v > $max) |
|
176
|
0 |
9 |
if scalar @opts |
|
178
|
6 |
3 |
if ($template =~ /^(sid|sni|hdi|udi)([1-9][0-9]*)$/u) { } |
|
|
0 |
3 |
elsif ($template eq '4+12') { } |
|
|
1 |
2 |
elsif ($template eq 'uuid128') { } |
|
|
1 |
1 |
elsif ($template eq 'uuidhexdash') { } |
|
|
1 |
0 |
elsif ($template eq 'uuidHEXDASH') { } |
|
182
|
2 |
4 |
if ($bits == 8) { } |
|
|
2 |
2 |
elsif ($bits == 16) { } |
|
|
2 |
0 |
elsif ($bits == 32) { } |
|
195
|
0 |
0 |
unless length $data == 2 |
|
202
|
0 |
0 |
if ($prefix == $_4plus12_prefix{$key}) |
|
209
|
0 |
1 |
unless length $data == 16 |
|
217
|
6 |
0 |
if (defined $type and defined $pack_template) |
|
221
|
2 |
4 |
if ($pack_template eq 'C') { } |
|
|
2 |
2 |
elsif ($pack_template eq 'n') { } |
|
|
2 |
0 |
elsif ($pack_template eq 'N') { } |
|
229
|
0 |
6 |
unless $len == $exp |
|
241
|
0 |
16 |
if scalar @opts |
|
248
|
1 |
15 |
if (my($d, $v) = $data =~ /^(\[.+?\]):(.+)$/u) |
|
254
|
2 |
13 |
if ($data =~ /^'([0-9]*)$/u) { } |
|
|
0 |
13 |
elsif ($data =~ m[^/([0-9]+)$]u) { } |
|
|
4 |
9 |
elsif ($data =~ /^(sid|sni):([0-9]+)$/u) { } |
|
|
2 |
7 |
elsif ($data =~ /^uuid:([0-9a-fA-F-]+)$/u) { } |
|
|
0 |
7 |
elsif ($data =~ /^wd:([QPL][1-9][0-9]*)$/u) { } |
|
|
0 |
7 |
elsif ($data =~ /^~([0-9]+)$/u) { } |
|
|
1 |
6 |
elsif ($data =~ /^raen:([0-9]+)$/u) { } |
|
|
1 |
5 |
elsif ($data =~ /^chat0w:([0-9]+)$/u) { } |
|
|
0 |
5 |
elsif ($data =~ /^asciicp:([0-9]+)$/u) { } |
|
|
1 |
4 |
elsif ($data =~ /^raes:(.+)/u) { } |
|
|
2 |
2 |
elsif (defined $_logicals_to_sni{$data}) { } |
|
|
0 |
2 |
elsif (defined $_logicals_to_sid{$data}) { } |
|
|
2 |
0 |
elsif ($data =~ /^logical:(.+)$/u) { } |
|
276
|
1 |
0 |
if (defined(my $raen = $_raes_to_raen{$1})) |
|
285
|
2 |
0 |
if (defined $_logicals_to_sni{$data}) { } |
|
|
0 |
0 |
elsif (defined $_logicals_to_sid{$data}) { } |
|
308
|
0 |
0 |
if scalar @opts |
|
312
|
0 |
0 |
if (defined(my Data::Identifier $generator = $identifier->generator("default", undef)) and defined(my $req = $identifier->request("default", undef))) |
|
313
|
0 |
0 |
if ($generator->eq('53863a15-68d4-448d-bd69-a9b19289a191')) { } |
|
|
0 |
0 |
elsif ($generator->eq('d74f8c35-bcb8-465c-9a77-01010e8ed25c') and $req =~ /^[Uu]\+([0-9a-fA-F]{4,6})$/u) { } |
|
317
|
0 |
0 |
if ($cp < 128) |
|
325
|
0 |
0 |
$ent->[0] =~ /^[a-z]/u ? : |
|
326
|
0 |
0 |
if $v =~ /-/u |
|
339
|
34 |
0 |
if (scalar @args) |
|
340
|
34 |
0 |
if (ref $args[0] and eval {
do {
$args[0]->isa(__PACKAGE__)
}
}) { } |
|
|
0 |
0 |
elsif ($args[0] eq __PACKAGE__) { } |
|
367
|
24 |
14 |
unless defined $id->uuid("no_defaults", 1, "default", undef) |