| line |
true |
false |
branch |
|
131
|
0 |
0 |
unless $self->server |
|
132
|
0 |
0 |
unless $self->port |
|
133
|
0 |
0 |
unless $self->path |
|
155
|
0 |
0 |
unless ref $skel eq 'HASH' |
|
159
|
0 |
0 |
if ref $v eq 'ARRAY' |
|
160
|
0 |
0 |
if ($v =~ /^:(.*)/) { } |
|
168
|
0 |
0 |
if $data{$k} and $l |
|
178
|
0 |
0 |
if exists $self->{$_} |
|
190
|
0 |
0 |
unless $content{'message_type'} = $message_type{lc $content{'action'}} |
|
193
|
0 |
0 |
unless defined $content{$_} |
|
195
|
0 |
0 |
if (length $content{'merchant_id'} == 12) { } |
|
|
0 |
0 |
elsif (length $content{'merchant_id'} == 6) { } |
|
206
|
0 |
0 |
if $content{'currency'} |
|
208
|
0 |
0 |
if ($content{'card_number'} =~ /^(4|6011)/) |
|
209
|
0 |
0 |
if (defined $content{'cvv2'}) { } |
|
220
|
0 |
0 |
unless ($content{'invoice_number'}) |
|
232
|
0 |
0 |
$paymentech_countries{$content{'country'}} ? : |
|
249
|
0 |
0 |
if ($content{'message_type'} eq 'MFC') { } |
|
|
0 |
0 |
elsif ($content{'message_type'} eq 'V') { } |
|
272
|
0 |
0 |
unless ($self->test_transaction) |
|
276
|
0 |
0 |
if $Business::OnlinePayment::PaymenTech::DEBUG |
|
283
|
0 |
0 |
if $Business::OnlinePayment::PaymenTech::DEBUG |
|
302
|
0 |
0 |
if ref $r->{$_} and not keys %{$$r{$_};} |
|
306
|
0 |
0 |
if ref $r->{$_} and exists $r->{$_}{'content'} |
|
309
|
0 |
0 |
if (not $server_response =~ /^200/) { } |
|
315
|
0 |
0 |
if $r->{'ProcStatus'} != 0 |
|
322
|
0 |
0 |
unless exists $r->{'ProcStatus'} |
|
324
|
0 |
0 |
exists $r->{'ApprovalStatus'} ? : |
|
|
0 |
0 |
if ($r->{'ProcStatus'} != 0 or exists $r->{'ApprovalStatus'} ? $r->{'ApprovalStatus'} != 1 : $r->{'StatusMsg'} ne 'Approved') { } |
|
342
|
0 |
0 |
unless ref $r->{'AuthCode'} |