| line |
true |
false |
branch |
|
120
|
3 |
1 |
if (@r) |
|
122
|
1 |
2 |
if defined $r[0] and ref $r[0] eq 'HASH' |
|
123
|
0 |
3 |
unless @r % 2 == 0 |
|
126
|
1 |
6 |
ref $ids eq 'ARRAY' ? : |
|
128
|
0 |
9 |
Net::DRI::Util::isa_contact($id) ? : |
|
146
|
1 |
2 |
unless defined $ctype |
|
147
|
1 |
1 |
exists $$self{'c'}{$ctype} && @{$$self{'c'}{$ctype};} ? : |
|
154
|
0 |
0 |
@a ? : |
|
162
|
0 |
3 |
defined $i && $i eq $id ? : |
|
163
|
0 |
9 |
if @p |
|
170
|
0 |
9 |
unless defined $cobj |
|
172
|
7 |
2 |
if defined $ctype and not exists $$c{$ctype} |
|
176
|
6 |
9 |
if defined $ctype and $k ne $ctype |
|
177
|
9 |
0 |
if ($id) |
|
180
|
0 |
9 |
if (defined $p) |
|
194
|
0 |
0 |
unless defined $ctype |
|
196
|
0 |
0 |
if defined $ctype and not exists $$c{$ctype} |
|
198
|
0 |
0 |
unless $id |
|
201
|
0 |
0 |
if defined $ctype and $k ne $ctype |
|
203
|
0 |
0 |
unless defined $p |
|
220
|
0 |
0 |
unless defined $robj |
|
222
|
0 |
0 |
if defined $ctype and not exists $$c{$ctype} |
|
225
|
0 |
0 |
if defined $ctype and $k ne $ctype |
|
226
|
0 |
0 |
ref $robj eq 'ARRAY' ? : |
|
234
|
0 |
6 |
unless defined $ctype |
|
236
|
0 |
6 |
unless exists $$c{$ctype} |
|
237
|
2 |
4 |
wantarray ? : |
|
251
|
0 |
0 |
unless defined $other and ref $other eq ref $self |
|
254
|
0 |
0 |
unless keys %$c1 == keys %$c2 |
|
255
|
0 |
0 |
if grep {not exists $$c1{$_};} keys %$c2 |
|
256
|
0 |
0 |
if grep {not exists $$c2{$_};} keys %$c1 |
|
261
|
0 |
0 |
if grep {not exists $tmp2{$_};} keys %tmp1 |
|
262
|
0 |
0 |
if grep {not exists $tmp1{$_};} keys %tmp2 |
|
271
|
0 |
0 |
unless defined $cobj |
|
273
|
0 |
0 |
if defined $ctype and not exists $$c{$ctype} |
|
274
|
0 |
0 |
ref $cobj ? : |
|
275
|
0 |
0 |
unless defined $id and $id |
|
278
|
0 |
0 |
if defined $ctype and $k ne $ctype |
|
279
|
0 |
0 |
if defined $self->_pos($k, $id) |
|
289
|
0 |
5 |
unless $attr =~ /[^A-Z]/ |
|
292
|
0 |
5 |
unless ($ctype) = $attr =~ /^contact_(\S+)$/ |