| line |
!l |
l&&!r |
l&&r |
condition |
|
179
|
0 |
9 |
0 |
$year and $year < 1583 || $year > 9999 |
|
180
|
1 |
8 |
0 |
$month and $month < 1 || $month > 12 |
|
181
|
2 |
7 |
0 |
$day and $day < 1 || $day > 31 |
|
187
|
2 |
0 |
7 |
$precision eq "day" and $day |
|
|
1 |
0 |
1 |
$precision eq "month" and $month |
|
|
0 |
0 |
1 |
$precision eq "year" and $year |
|
223
|
0 |
0 |
0 |
defined $name and length $name |
|
322
|
9 |
0 |
11 |
defined(my $style = $opts{'style'}) and defined(my $request = $opts{'request'}) |
|
397
|
0 |
0 |
20 |
defined $tag->{'generator'} and not ref $tag->{'generator'} |
|
462
|
0 |
0 |
0 |
defined $raw and length $raw == 16 |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
91
|
0 |
6 |
0 |
$opts{'displayname'} //= $request |
|
111
|
0 |
0 |
0 |
$unicode_cp < 0 or $unicode_cp > 127 |
|
117
|
0 |
0 |
3 |
$unicode_cp < 0 or $unicode_cp > 1114111 |
|
121
|
0 |
0 |
3 |
$unicode_cp == 65532 or $unicode_cp == 65533 |
|
|
0 |
0 |
3 |
$unicode_cp == 65532 or $unicode_cp == 65533 or $unicode_cp == 65279 |
|
|
0 |
0 |
3 |
$unicode_cp == 65532 or $unicode_cp == 65533 or $unicode_cp == 65279 or $unicode_cp == 65534 |
|
125
|
0 |
3 |
0 |
$opts{'displayname'} //= $unicode_cp_str |
|
159
|
0 |
0 |
3 |
$request eq "now" or $request eq "today" |
|
179
|
0 |
0 |
9 |
$year < 1583 || $year > 9999 |
|
180
|
0 |
0 |
8 |
$month < 1 || $month > 12 |
|
181
|
0 |
0 |
7 |
$day < 1 || $day > 31 |
|
186
|
0 |
7 |
2 |
$opts{'precision'} // ($day ? "day" : undef) |
|
|
7 |
1 |
1 |
($opts{'precision'} // ($day ? "day" : undef)) // ($month ? "month" : undef) |
|
198
|
0 |
9 |
0 |
$opts{'input'} //= $request |
|
201
|
0 |
9 |
0 |
$opts{'displayname'} //= $request |
|
227
|
0 |
0 |
0 |
$opts{'displayname'} //= $name |
|
234
|
0 |
0 |
0 |
$_multiplicity_prefix{$subtype} // croak('Invalid subtype: ' . $subtype) |
|
238
|
0 |
0 |
0 |
$request eq 0 or $request =~ /^[1-9][0-9]*$/u |
|
245
|
0 |
0 |
0 |
$opts{'displayname'} //= $_multiplicity_names{$request} |
|
246
|
0 |
0 |
0 |
$opts{'displayname'} //= $request |
|
251
|
0 |
0 |
0 |
$identifier->{'id_cache'}{"Data::Identifier"->WK_OID} //= $oid |
|
269
|
0 |
0 |
0 |
$_gte_simple_profiles{$profile} // $profile |
|
308
|
0 |
0 |
0 |
$opts{'namespace'} //= $profile->{'namespace'} |
|
309
|
0 |
0 |
0 |
$opts{'displayname'} //= $normal |
|
319
|
0 |
0 |
0 |
$opts{'namespace'} //= $type->namespace |
|
325
|
0 |
3 |
3 |
$opts{'input'} //= $request |
|
337
|
0 |
0 |
0 |
$opts{'input'} //= lc $input |
|
338
|
0 |
0 |
0 |
$opts{'displayname'} //= $name |
|
341
|
0 |
0 |
0 |
$opts{'input'} //= &encode("UTF-8", $request) |
|
342
|
0 |
0 |
0 |
$opts{'displayname'} //= $request |
|
346
|
0 |
0 |
0 |
$opts{'input'} //= $identifier->uuid |
|
347
|
0 |
0 |
0 |
$opts{'displayname'} //= $identifier->{'displayname'} |
|
349
|
0 |
0 |
0 |
$opts{'input'} //= $request |
|
369
|
0 |
0 |
0 |
$opts{'input'} //= join(",", sort(keys %uuids)) |
|
380
|
0 |
5 |
0 |
$opts{'input'} //= $req |
|
396
|
0 |
37 |
3 |
$tag->{$_} //= $opts{$_} |
|
435
|
0 |
0 |
0 |
$opts{'sources'} // (state $default_sources = ["Crypt::URandom", "UUID4::Tiny", "Math::Random::Secure", "UUID::URandom", "UUID::Tiny::Patch::UseMRS"]) |