| line |
true |
false |
branch |
|
264
|
40 |
0 |
defined $_[0] ? : |
|
267
|
0 |
40 |
unless ref $opt eq 'HASH' |
|
270
|
0 |
40 |
unless exists $$opt{'date_format'} |
|
281
|
0 |
40 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
289
|
0 |
40 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
291
|
0 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
296
|
0 |
40 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
297
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
301
|
0 |
40 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
303
|
0 |
0 |
if $val =~ /$rx/ |
|
308
|
40 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
309
|
40 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
325
|
0 |
5 |
if (ref $from ne ref $to) |
|
336
|
0 |
5 |
if ($from->get_date_format ne $to->get_date_format) |
|
357
|
0 |
40 |
unless &_value_is_allowed('date_format', $val) |