| line |
true |
false |
branch |
|
40
|
0 |
13 |
unless (defined $dt) |
|
45
|
1 |
12 |
if (ref $dt eq 'DateTime') |
|
50
|
1 |
11 |
if ($dt =~ /^\d{10}$/) |
|
54
|
1 |
10 |
if ($dt =~ /^\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}Z$/) |
|
56
|
1 |
0 |
if ($ret) |
|
63
|
5 |
5 |
if ($dt =~ /^\d+$/) { } |
|
|
1 |
4 |
elsif ($dt =~ /^(\d{4})(\d{2})(\d{2})(\d{2})(\d{2})(\d{2})(\S+)?$/) { } |
|
64
|
3 |
2 |
if ($dt =~ /^\d{8}$/) { } |
|
67
|
2 |
1 |
unless ($dt) |
|
82
|
1 |
3 |
unless $dt |
|
96
|
0 |
1 |
unless my $parser = 'DateTime::Format::Strptime'->new('pattern', $pattern, 'time_zone', $zone) |
|
104
|
0 |
1 |
unless my $t = $parser->parse_datetime($str) |