line |
true |
false |
branch |
55
|
0 |
0 |
if (ref $$obj{$_} eq 'HASH') { } |
56
|
0 |
0 |
if ($$obj{$_}{$par} =~ /^$/) |
58
|
0 |
0 |
if ($$obj{$_} =~ /^$/) |
62
|
0 |
0 |
if (exists $p{'Port'}) |
75
|
0 |
0 |
unless (exists $p{'Text'}) |
76
|
0 |
0 |
if (exists $p{'Form'}) { } |
|
0 |
0 |
elsif (exists $p{'File'}) { } |
77
|
0 |
0 |
unless ($p{'Text'} = $self->GetFormDB('Form', $p{'Form'})) |
82
|
0 |
0 |
unless ($p{'Text'} = $self->GetFormFile('File', $p{'File'})) |
96
|
0 |
0 |
if (exists $p{'Data'}{$method}) { } |
|
0 |
0 |
elsif ($method =~ /(.+)\{(.+)\}/i) { } |
105
|
0 |
0 |
if ($@ =~ /^can't locate object method/i) |
113
|
0 |
0 |
if ($@ =~ /^can't locate object method/i) |
120
|
0 |
0 |
unless (exists $$self{'wrapper'}) |
123
|
0 |
0 |
unless ($p{'NoWrap'}) |
132
|
0 |
0 |
if ($$self{'myDB'} and $$self{'DBTool'}) |