line |
true |
false |
branch |
69
|
0 |
5 |
if ref $self
|
75
|
3 |
2 |
unless defined $types and @$types
|
78
|
0 |
14 |
if ($PGObject::VERSION =~ /^1\./) { }
|
107
|
28 |
2 |
defined $args{'year'} && $args{'year'} > 1 ? :
|
108
|
30 |
0 |
defined $args{'hour'} ? :
|
109
|
28 |
2 |
defined $args{'time_zone'} ? :
|
168
|
8 |
3 |
unless grep {$args{'to'} eq $_;} 'hour', 'minute', 'second'
|
181
|
1 |
6 |
unless defined $value
|
182
|
5 |
2 |
if $value =~ /(\d{4})-(\d{2})-(\d{2})/
|
184
|
5 |
2 |
if $value =~ /(\d+):(\d+):([0-9.]+)([+-]\d{1,4})?/
|
187
|
3 |
4 |
if $tz =~ /([+-]\d{2}$)/
|
188
|
5 |
2 |
if $sec
|
189
|
5 |
2 |
if $nanosec
|
200
|
2 |
5 |
unless defined $hour
|
201
|
4 |
3 |
if $tz == $default_tz
|
213
|
1 |
7 |
unless $self->is_date or $self->is_time
|
219
|
1 |
6 |
$offset > 0 ? :
|
222
|
0 |
7 |
if ($offset_min)
|
226
|
6 |
1 |
if $self->is_date
|
227
|
4 |
3 |
if $self->is_date and $self->is_time
|
228
|
5 |
2 |
if $self->is_time
|
229
|
3 |
4 |
if $self->time_zone ne $default_tz and $self->is_time
|
242
|
0 |
22 |
if (defined $val)
|
258
|
2 |
28 |
if (defined $val)
|
273
|
4 |
6 |
if (defined $val)
|