Branch Coverage

blib/lib/Business/OnlinePayment/PayflowPro.pm
Criterion Covered Total %
branch 16 68 23.5


line true false branch
20 0 2 if $@
26 5 0 if (ref $self) { }
27 1 4 if @_
28 2 3 unless $$self{'__request_id'}
47 0 0 if (@_)
49 0 0 if (ref $self) { }
57 0 0 ref $self ? :
84 0 8 if ($opts{'debug'})
140 0 0 ref $map{$_} ? :
150 4 0 if (defined $expiration and $expiration =~ /^(\d+)\D+\d*(\d{2})$/)
154 4 0 defined $expdate_mmyy ? :
164 0 0 if ($self->transaction_type ne 'C')
173 0 0 if $self->test_transaction
178 0 0 $vendor ? :
227 0 0 if ($self->transaction_type eq 'C')
228 0 0 if (defined $content{'ORIGID'} and length $content{'ORIGID'}) { }
251 0 0 unless $self->headers
254 0 0 if (defined $content{'request_id'})
258 0 0 unless (defined $req_headers{'X-VPS-Request-ID'})
262 0 0 unless (defined $req_headers{'X-VPS-VIT-Client-Certification-Id'})
267 0 0 unless (defined $req_headers{'X-VPS-Client-Timeout'})
299 0 0 defined $params{$key} ? :
300 0 0 if (index($value, '&') != -1 or index($value, '=') != -1)
319 0 0 if (defined $$response{'AVSADDR'} or defined $$response{'AVSZIP'})
320 0 0 if ($$response{'AVSADDR'} eq 'Y' and $$response{'AVSZIP'} eq 'Y') { }
0 0 elsif ($$response{'AVSADDR'} eq 'Y') { }
0 0 elsif ($$response{'AVSZIP'} eq 'Y') { }
0 0 elsif ($$response{'AVSADDR'} eq 'N' or $$response{'AVSZIP'} eq 'N') { }
346 0 0 if (defined $$response{'RESULT'} and $$response{'RESULT'} eq '0') { }
361 1 5 if (not defined $page or ref $page and not defined $$page)
366 0 5 ref $page ? :
368 5 14 unless defined $param
369 0 14 unless defined $value
371 0 14 if ($no_cgi_util) { }