| line |
true |
false |
branch |
|
154
|
408 |
1 |
unless exists $args{$field_name} |
|
156
|
0 |
1 |
if $$field_def[3] |
|
160
|
1 |
3 |
if scalar keys %args |
|
168
|
0 |
20 |
unless ref $self |
|
171
|
0 |
20 |
if $field_name eq 'DESTROY' |
|
172
|
1 |
19 |
unless exists $fields{$field_name} |
|
175
|
13 |
6 |
if (not ref $field) { } |
|
|
5 |
1 |
elsif (defined $$field) { } |
|
177
|
4 |
9 |
if $$field_def[3] |
|
180
|
3 |
2 |
if $$field_def[3] |
|
185
|
0 |
1 |
if $$field_def[3] |
|
204
|
0 |
2 |
if $pos + 12 > $len |
|
208
|
0 |
104 |
if $pos + 4 > $len |
|
211
|
0 |
104 |
if $pos + 4 > $len |
|
214
|
0 |
104 |
if $pos + $field_len > $len |
|
215
|
0 |
104 |
if $field_len > 4096 |
|
218
|
0 |
104 |
unless exists $lookup{$field_id} |
|
220
|
46 |
58 |
if $$field_def[3] |
|
221
|
104 |
0 |
if $$field_def[1] |
|
222
|
46 |
58 |
if $$field_def[3] |
|
237
|
33 |
52 |
unless exists $$self{"_$field_name"} |
|
239
|
23 |
29 |
if $$field_def[3] |
|
240
|
52 |
0 |
if $$field_def[1] |
|
241
|
23 |
29 |
if $$field_def[3] |
|
258
|
0 |
0 |
unless exists $$self{"_$field_name"} |
|
260
|
0 |
0 |
if $$field_def[3] |
|
270
|
80 |
0 |
ref $$field_def[2] eq 'Regexp' ? : |
|
|
80 |
30 |
$$field_def[2] ? : |
|
271
|
80 |
30 |
if $field_re |
|
279
|
126 |
4 |
unless $operation eq 'get' or $operation eq 'set' |
|
280
|
2 |
2 |
$$value ? : |
|
288
|
0 |
15 |
if $operation eq 'text' |
|
290
|
3 |
12 |
unless $operation eq 'read' or $operation eq 'write' |
|
292
|
6 |
6 |
unless $phase eq 'packed' |
|
296
|
4 |
2 |
if ($operation eq 'read') { } |
|
297
|
0 |
4 |
if $pos + 2 > $len |
|
299
|
0 |
4 |
if $pos + 4 > $len |
|
302
|
0 |
4 |
if $pos + $password_len != $len |
|
308
|
6 |
3 |
$pos + 4 > $len ? : |
|
313
|
6 |
3 |
$operation eq 'read' ? : |