| line |
true |
false |
branch |
|
100
|
3 |
24 |
unless length $value |
|
103
|
5 |
19 |
unless $value =~ /
^
([+-])? # sign ($1)
(?:
(INF) # infinity ($2)
| (NaN) # not a number ($3)
| (\d+(?:\.\d+)?) # mantissa ($4)
(?:[eE] # exponent
([+-])? # sign ($5)
(\d+) # value ($6)
)?
)
$
/x |
|
120
|
2 |
17 |
$2 ? : |
|
121
|
2 |
17 |
$3 ? : |
|
130
|
2 |
10 |
if $exp and $exp < -1075 || $exp > 970 |
|
159
|
2 |
4 |
if $exp and $exp < -149 || $exp > 104 |
|
184
|
5 |
141 |
unless length $value |
|
187
|
11 |
130 |
unless $value =~ /
^
([+-])? # sign ($1)
0*(\d+) # integer ($2)
(?:\.(\d+)0*)? # fraction ($3)
$
/x |
|
224
|
1 |
61 |
unless length $value |
|
227
|
6 |
55 |
unless $value =~ /
^
(-)? # sign ($1)
P([^T]*) # date ($2)
(?:T(.+))? # time ($3)
$
/x |
|
236
|
1 |
7 |
unless length $2 or $3 |
|
244
|
0 |
54 |
unless $$instance{'date'} =~ /
^
(?:(\d+)Y)? # years ($1)
(?:(\d+)M)? # months ($2)
(?:(\d+)D)? # days ($3)
$
/x |
|
252
|
30 |
24 |
$1 || $2 || $3 ? : |
|
255
|
0 |
54 |
unless $$instance{'time'} =~ /
^
(?:(\d+)H)? # hours ($1)
(?:(\d+)M)? # minutes ($2)
(?:(\d(?:\.\d+)?)S)? # seconds ($3)
$
/x |
|
263
|
10 |
44 |
$1 || $2 || $3 ? : |
|
292
|
1 |
20 |
unless $self->SUPER::init(@_) |
|
293
|
2 |
18 |
unless $self->facet('duration') |
|
295
|
1 |
17 |
unless $self->facet('period') |
|
304
|
0 |
10 |
unless length $value |
|
307
|
0 |
10 |
unless $value =~ /
^
([+-])? # sign ($1)
(\d{2,}) # century ($2)
(\d{2}) - # year ($3)
(\d{2}) - # month ($4)
(\d{2}) T # day ($5)
(\d{2}) : # hour ($6)
(\d{2}) : # minute ($7)
(\d{2}(?:.\d+)?) # second ($8)
(?: # optional time zone
(Z) # UTC ($9)
| ([-+]) # sign ($10)
(\d{2}) : # hours ($11)
(\d{2}) # minutes ($12)
)?
$
/x |
|
329
|
3 |
7 |
$9 ? : |
|
353
|
1 |
2 |
unless $self->SUPER::init(@_) |
|
354
|
1 |
1 |
unless $self->facet('encoding') |
|
407
|
1 |
4 |
unless length $value |
|
410
|
1 |
3 |
unless $value =~ /
^
(?:
([a-zA-Z_][\w\-.]*?) # prefix ($1)
:
)?
([a-zA-Z_][\w\-.]*?) # local ($2)
$
/x |
|
876
|
1 |
27 |
unless length $value |
|
879
|
3 |
24 |
unless $value =~ /
^
(\d{2}) : # hour ($1)
(\d{2}) : # minute ($2)
(\d{2}(?:.\d+)?) # second ($3)
(?: # optional time zone
(Z) # UTC ($4)
| ([-+]) # sign ($5)
(\d{2}) : # hours ($6)
(\d{2}) # minutes ($7)
)?
$
/x |
|
895
|
2 |
22 |
$4 ? : |
|
932
|
0 |
5 |
unless length $value |
|
935
|
1 |
4 |
unless $value =~ /
^
([-+]?) # sign ($1)
(\d{2,}) # century ($2)
(\d{2}) - # year ($3)
(\d{2}) - # month ($4)
(\d{2}) # day ($5)
$
/x |
|
968
|
0 |
6 |
unless length $value |
|
971
|
2 |
4 |
unless $value =~ /
^
([-+]?) # sign ($1)
(\d{2,}) # century ($2)
(\d{2}) - # year ($3)
(\d{2}) # month ($4)
$
/x |
|
1003
|
0 |
7 |
unless length $value |
|
1006
|
2 |
5 |
unless $value =~ /
^
([-+]?) # sign ($1)
(\d{2,}) # century ($2)
(\d{2}) # year ($3)
$
/x |
|
1037
|
0 |
7 |
unless length $value |
|
1040
|
2 |
5 |
unless $value =~ /
^
([-+]?) # sign ($1)
(\d{2,}) # century ($2)
$
/x |
|
1071
|
0 |
5 |
unless length $value |
|
1074
|
2 |
3 |
unless $value =~ /
^
--
(\d{2}) - # month ($1)
(\d{2}) # day ($2)
$
/x |
|
1106
|
0 |
2 |
unless length $value |
|
1109
|
0 |
2 |
unless $value =~ /
^
---
(\d{2}) # day ($1)
$
/x |