| line | % | coverage | branch |
|---|
| 38 | 50 | T | F | unless (defined $prefformat) |
| 45 | 0 | T | F | if (defined $prefformat) |
| 81 | 100 | T | F | @_ ? : |
| 87 | 100 | T | F | if $format eq 'sql' |
| 89 | 100 | T | F | if $format eq 'iso' |
| 91 | 100 | T | F | if $format eq 'rfc822' |
| 98 | 50 | T | F | unless my $val = shift @_ |
| 99 | 50 | T | F | unless my $dformat = $$self{'dateformat'} |
| 102 | 50 | T | F | if $debug |
| 103 | 50 | T | F | if ($val =~ /$re/) |
| 105 | 100 | T | F | if ($dformat eq 'rfc822') |
| 122 | 50 | T | F | if $dformat eq 'rfc822' |
| 125 | 100 | T | F | if ($months[$i] =~ /$month_abbr/) |
| 132 | 50 | T | F | if ($days[$i] =~ /$day_abbr/) |
| 143 | 100 | T | F | unless (check_date($year, $month, $day)) |
| 147 | 50 | T | F | unless (check_time($hour, $minute, $second)) |
| 173 | 100 | T | F | scalar @_ >= 2 ? : |
| 174 | 0 | T | F | scalar @_ >= 2 ? : |
| 50 | T | F | unless $format_map{$dformat} |
| 175 | 100 | T | F | @_ ? : |
| 176 | 50 | T | F | if ($debug and $debug > 1) |
| 182 | 100 | T | F | @_ ? : |
| 189 | 50 | T | F | @_ ? : |
| 195 | 100 | T | F | if $incoming eq 'syspref' |
| 196 | 50 | T | F | unless scalar grep(/^$incoming$/, keys %format_map) == 1 |
| 202 | 0 | T | F | @_ ? : |
| 208 | 100 | T | F | unless @_ |
| 214 | 50 | T | F | if (@_) |
| 217 | 50 | T | F | if $self eq 'C4::Dates' |
| 223 | 50 | T | F | @_ ? : |