Condition Coverage

blib/lib/Data/Domain.pm
Criterion Covered Total %
condition 108 155 69.6


and 3 conditions

line !l l&&!r l&&r condition
70 0 4 1 !ref($_->[0]) && $_->[0] =~ /^!/
264 1 1 1 not ref $data and $data->isa($data)
405 0 0 13 &does($range, "ARRAY") and @$range == 2
423 87 18 21 defined $min and defined $max
486 129 24 123 @$args_ref and $args_ref->[0] =~ /^-/
554 24 2 0 $self->{'-defined'} and $self->{'-optional'}
657 0 20 56 defined $data and $data =~ /^-?\d+$/
674 0 1 2 defined $data and $data =~ /^\d+$/
818 14 1 6 $self->{$bound} and not $self->{$bound} =~ /$dynamic_date/
855 4 0 14 @date and check_date(@date)
893 1 0 8 $h <= 23 && $m <= 59 && $s <= 59
931 2 0 4 $self->{$bound} and $self->{$bound} ne "now"
933 0 0 4 @time and _valid_time(@time)
950 1 1 4 @t and _valid_time(@t)
1054 10 0 0 $self->{$bound} and $self->{$bound} < @{$self->{'-items'};}
1078 30 6 1 defined $self->{'-min_size'} and @$data < $self->{'-min_size'}
1082 30 5 1 defined $self->{'-max_size'} and @$data > $self->{'-max_size'}

or 2 conditions

line l !l condition
891 9 0 $m ||= 0
892 0 9 $s ||= 0
1089 11 22 $context ||= {"root", $data, "flat", {}, "path", []}
1097 19 14 $self->{'-items'} || []
1168 12 2 $self->{'-fields'} || []
1230 103 26 $context ||= {"root", $data, "flat", {}, "list", [], "path", []}

or 3 conditions

line l !l&&r !l&&!r condition
211 0 0 3 ref $class or $class ne "Data::Domain"
357 6 234 0 $self->{'-name'} || $subclass
380 172 56 0 $global_msgs->{$subclass}{$msg_id} || $global_msgs->{'Generic'}{$msg_id}
389 367 0 0 ref $self || $self
397 10 117 0 $self->{'-name'} || $self->subclass
710 158 1 3 not ref $data or overload::Method($data, "\"\"")
861 0 2 4 not check_date(@$min) or _date_cmp(\@date, $min) < 0
867 0 1 2 not check_date(@$max) or _date_cmp(\@date, $max) > 0
910 7 0 0 $t1->[0] <=> $t2->[0] || ($t1->[1] || 0) <=> ($t2->[1] || 0) || ($t1->[2] || 0) <=> ($t2->[2] || 0)
1086 19 8 8 $self->{'-items'} or $self->{'-all'}
8 6 2 $self->{'-items'} or $self->{'-all'} or $self->{'-any'}
1107 8 6 36 $has_invalid ||= $msgs[$i]
1120 3 3 22 $has_invalid ||= $msgs[$i]
1133 0 1 0 $any->[0]{'-name'} || $any->[0]->subclass
1145 0 4 0 $subdomain->{'-name'} || $subdomain->subclass
1189 1 1 1 &does($exclude, "ARRAY") or &does($exclude, "Regexp")
2 1 0 &does($exclude, "ARRAY") or &does($exclude, "Regexp") or not ref $exclude
1197 2 0 0 &does($dom, "Data::Domain::List") or &does($dom, "CODE")
1220 3 3 2 match::simple::match($field, $exclude) or match::simple::match($exclude, ["*", "all"])
1243 7 8 239 $has_invalid ||= $msg

xor 4 conditions

line l&&r l&&!r !l&&r !l&&!r condition
260 2 2 2 2 &Scalar::Util::blessed($data) xor $self->{'-blessed'}
264 1 0 2 0 not ref $data and $data->isa($data) xor $self->{'-package'}
268 0 0 0 0 &Scalar::Util::isweak($data) xor $self->{'-isweak'}
272 0 0 0 0 &Scalar::Util::readonly($data) xor $self->{'-readonly'}
276 0 0 0 0 &Scalar::Util::readonly($data) xor $self->{'-tainted'}
283 2 2 3 4 $data xor $self->{'-true'}
287 1 1 2 2 ref $data xor $self->{'-ref'}
564 3 3 2 1 defined $data xor $self->{'-defined'}