line |
true |
false |
branch |
24
|
1 |
2 |
unless $self->has_name
|
122
|
8 |
17 |
if ($self->has_separator)
|
124
|
0 |
8 |
$_ eq '' || !defined($_) ? :
|
128
|
25 |
0 |
unless ($base =~ /^(string|json|xml|html|anyatomictype)^/u)
|
132
|
25 |
0 |
unless ($base =~ /^(string|json|xml|html|anyatomictype|normalizedstring)^/u)
|
138
|
0 |
25 |
$self->has_null ? :
|
142
|
0 |
0 |
if ($self->has_default and $v eq '' || !defined($v))
|
145
|
10 |
17 |
$self->has_coercion ? :
|
146
|
0 |
27 |
if ($is_null{$c}) { }
|
|
23 |
4 |
elsif ($self->check($c)) { }
|
150
|
0 |
23 |
if ($obj and $base eq 'boolean') { }
|
|
0 |
23 |
elsif ($obj and $base =~ /duration/u) { }
|
|
0 |
23 |
elsif ($obj and $base =~ /datetime/u) { }
|
|
5 |
18 |
elsif ($obj and $is_dt{$base}) { }
|
|
0 |
18 |
elsif ($is_numeric{$base}) { }
|
153
|
0 |
0 |
$c eq 'false' || $c eq '0' ? :
|
|
0 |
0 |
$c eq 'true' || $c eq '1' ? :
|
172
|
4 |
0 |
if ($self->base_type_constraint->check($c)) { }
|
182
|
8 |
17 |
$self->has_separator || @_ > 3 ? :
|
201
|
0 |
4 |
unless $xsd_type
|
205
|
48 |
0 |
unless exists $dt{$key}
|
210
|
2 |
2 |
if (exists $dt{'format'})
|
211
|
0 |
2 |
if ($base eq 'boolean') { }
|
|
0 |
2 |
elsif ($is_numeric{$base}) { }
|
|
1 |
1 |
elsif ($is_dt{$base}) { }
|
227
|
0 |
4 |
if ($dt{'dc:title'})
|
234
|
0 |
4 |
if keys %dt
|
237
|
0 |
4 |
if (defined $coerce_boolean)
|
244
|
0 |
4 |
if (defined $coerce_numeric)
|
245
|
0 |
0 |
ref $coerce_numeric ? :
|
251
|
0 |
0 |
defined $_ ? :
|
256
|
1 |
3 |
if (defined $coerce_dt)
|
257
|
3 |
0 |
defined $_ ? :
|
278
|
0 |
0 |
if lc $value eq 'nan'
|
279
|
0 |
0 |
if lc $value eq 'inf'
|
280
|
0 |
0 |
if lc $value eq '-inf'
|
283
|
0 |
0 |
if (defined $pattern)
|
304
|
0 |
0 |
if (@regexp == 1)
|
311
|
0 |
0 |
if (not defined $pattern or $value =~ /$regexp/u)
|
314
|
0 |
0 |
unless ($decimal_char eq '.')
|
318
|
0 |
0 |
if ($value =~ /^(.+)\%$/u) { }
|
|
0 |
0 |
elsif ($value =~ /^(.+)\342\200\260$/u) { }
|
349
|
0 |
10 |
unless ref $dt
|