line |
true |
false |
branch |
49
|
6014 |
25847 |
if ref $class |
68
|
92130 |
191139 |
unless exists $args{$arg} |
70
|
34234 |
156905 |
unless defined $val |
77
|
1552 |
2936 |
unless exists $args{$arg} |
79
|
120 |
2816 |
unless defined $val |
86
|
0 |
31861 |
if (scalar keys %args) |
106
|
0 |
0 |
unless (defined $val) |
122
|
0 |
0 |
if ref $class |
133
|
0 |
0 |
if ref $class |
146
|
0 |
5 |
unless defined $string |
150
|
0 |
5 |
unless $string |
162
|
0 |
10 |
unless defined $arrayref |
164
|
0 |
10 |
unless $arrayref and ref $arrayref eq 'ARRAY' |
178
|
0 |
2150 |
unless defined $string |
182
|
0 |
2150 |
unless $string |
187
|
0 |
4919 |
unless $rec =~ /=/ |
191
|
0 |
4919 |
if exists $hash->{$fld} |
205
|
0 |
221 |
unless defined $hashref |
207
|
0 |
221 |
unless $hashref and ref $hashref eq 'HASH' |
225
|
0 |
43510 |
unless defined $value |
226
|
43287 |
223 |
unless ref $value |
228
|
218 |
5 |
if ref $value eq 'HASH' |
229
|
5 |
0 |
if ref $value eq 'ARRAY' |
257
|
0 |
5932 |
if (defined $new) |
258
|
0 |
0 |
unless ref $new |
259
|
0 |
0 |
unless $new and ref $new eq 'ARRAY' |
299
|
5423 |
6960 |
if (defined $new) |
300
|
2127 |
3296 |
unless ref $new |
301
|
0 |
5423 |
unless $new and ref $new eq 'HASH' || ref $new eq 'ARRAY' |
304
|
0 |
5423 |
if (ref $new eq 'ARRAY') { } |
305
|
0 |
0 |
if (scalar(@$new) % 2) |
336
|
5342 |
1800 |
if (defined $new) |
337
|
0 |
5342 |
if ref $new |
342
|
3507 |
1835 |
unless ($hash and ref $hash eq 'HASH') |
361
|
0 |
18749 |
if ref $class |
372
|
0 |
0 |
if ref $class |
380
|
0 |
10466 |
unless $obj and ref $obj |