line |
true |
false |
branch |
83
|
0 |
0 |
unless $content{'action_type'} = $map{$action} |
101
|
0 |
0 |
unless (defined $c{'items'}) |
107
|
0 |
0 |
if (lc($c{'type'}) =~ /^e?check$/i) |
124
|
0 |
0 |
$self->{'test_mode'} ? : |
142
|
0 |
0 |
if (lc $c{'type'} eq 'cc') |
146
|
0 |
0 |
unless $c{'expiration'} =~ /^(\d+)\D+\d*(\d{2})$/ |
148
|
0 |
0 |
if $month =~ /^\d$/ |
149
|
0 |
0 |
if length $year == 2 |
162
|
0 |
0 |
if (defined $c{'items'}) { } |
204
|
0 |
0 |
if ($status_code =~ /^200/) { } |
205
|
0 |
0 |
unless (eval {
do {
my $conv = 'XML::Hash::XS'->new('utf8', 0, 'encoding', 'utf-8');
my $hash = $conv->xml2hash($page);
$response = $hash->{'TransactionResponse'}{'TransactionResult'}
}
}) |
230
|
0 |
0 |
if ($response->{'Status'} eq 'ok') { } |
243
|
0 |
0 |
unless (defined $testMode) |
245
|
0 |
0 |
if uc $testMode eq 'TRUE' |
246
|
0 |
0 |
if uc $testMode eq 'FALSE' |
248
|
0 |
0 |
if ($testMode) { } |