| blib/lib/WDDX/Datetime.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 30 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 37 | 0 | 0 | if $value =~ /\D/ |
| 81 | 0 | 0 | $arg ? : |
| 0 | 0 | if defined $arg | |
| 101 | 0 | 0 | if $self->use_timezone_info |
| 122 | 0 | 0 | $gmt - $local >= 0 ? : |
| 151 | 0 | 0 | unless ($element eq 'datetime') |
| 164 | 0 | 0 | unless ($element eq 'datetime') |
| 168 | 0 | 0 | unless my($yr, $mon, $day, $hr, $min, $sec, $tz_dir, $tz_hr, $tz_min) = $value =~ /^(\d{4})-(\d+)-(\d+)T(\d+):(\d+):(\d+)(?:([+-])(\d+):(\d+))?$/i |
| 174 | 0 | 0 | if $yr < 0 |
| 180 | 0 | 0 | if ($@) |
| 183 | 0 | 0 | if ($time_in_secs < 0) |
| 187 | 0 | 0 | if ($tz_dir) |
| 189 | 0 | 0 | if ($tz_dir eq '+') { } |
| 202 | 0 | 0 | if ($loc_dir eq '-') { } |
| 213 | 0 | 0 | unless $tz_dir |