| 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 |
21 |
62 |
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'} |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
211
|
0 |
0 |
3 |
ref $class or $class ne "Data::Domain" |
|
357
|
6 |
236 |
0 |
$self->{'-name'} || $subclass |
|
380
|
174 |
56 |
0 |
$global_msgs->{$subclass}{$msg_id} || $global_msgs->{'Generic'}{$msg_id} |
|
389
|
369 |
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") |