line |
true |
false |
branch |
41
|
0 |
2 |
if (ref $args ne 'HASH') |
49
|
14 |
0 |
unless exists $$args{$cfg} |
70
|
0 |
0 |
unless $$args{'lazy'} |
86
|
2 |
0 |
if ($$args{$mod}) |
88
|
2 |
0 |
if (not $$args{$mod} =~ /::/) { } |
92
|
2 |
0 |
if ($@) |
99
|
2 |
0 |
if $@ |
106
|
0 |
0 |
if $@ |
127
|
0 |
0 |
if (not $session_id and $$self{'idfrom'}) |
135
|
0 |
0 |
if (defined $session_id and $session_id) |
147
|
0 |
0 |
if ($$self{'args'}{'create_unknown'}) { } |
163
|
0 |
0 |
if (not $$self{'status'} & 8) { } |
166
|
0 |
0 |
if (not $$self{'data'}{'_session_id'} or $$self{'args'}{'recreate_id'}) |
168
|
0 |
0 |
if (exists $$self{'generate'}) { } |
198
|
0 |
0 |
unless $$self{'status'} |
208
|
0 |
0 |
unless $$self{'status'} |
221
|
0 |
0 |
unless $$self{'status'} |
231
|
0 |
0 |
unless $$self{'status'} |
242
|
0 |
0 |
unless $$self{'status'} |
250
|
0 |
0 |
unless $$self{'status'} |
259
|
0 |
0 |
unless $$self{'status'} |
267
|
0 |
2 |
if $$self{'status'} |
279
|
0 |
0 |
if ($$self{'status'}) |
328
|
0 |
0 |
if $init and not $$self{'status'} |
330
|
0 |
0 |
if ($$self{'newidpending'} and $$self{'status'}) |
343
|
0 |
0 |
if $$self{'status'} & 1 |
347
|
0 |
0 |
unless $$self{'status'} |
359
|
0 |
0 |
if $$self{'status'} & 8 |
360
|
0 |
0 |
if $$self{'status'} & 1 |
362
|
0 |
0 |
if (exists $$self{'args'}{'Transaction'} and $$self{'args'}{'Transaction'}) { } |
383
|
0 |
0 |
unless $$self{'status'} & 2 or $$self{'status'} & 1 or $$self{'status'} & 4 |
388
|
0 |
0 |
if ($$self{'newidpending'}) |
397
|
0 |
0 |
if ($$self{'status'} & 4) |
404
|
0 |
0 |
if ($$self{'status'} & 1) |
413
|
0 |
0 |
if ($$self{'status'} & 2) |
451
|
0 |
0 |
if (not $$session{'data'}{'_session_id'} =~ /^[a-fA-F0-9]+$/) |
466
|
0 |
0 |
if (not $$self{'populated'}) { } |
472
|
0 |
0 |
if $store |
473
|
0 |
0 |
if $lock |
474
|
0 |
0 |
if $gen |
475
|
0 |
0 |
if $gen and defined &{$gen . '::validate';} |
476
|
0 |
0 |
if $ser |
477
|
0 |
0 |
if $ser |
479
|
0 |
0 |
unless (defined $$self{'validate'}) |
487
|
0 |
0 |
if $store |
488
|
0 |
0 |
if $lock |