Branch Coverage

blib/lib/Business/OnlinePayment/IPayment/Response.pm
Criterion Covered Total %
branch 28 38 73.6


line true false branch
562 0 1 if (defined $args{'my_userid'})
565 0 1 if (defined $args{'my_security_key'})
568 1 0 if (defined $args{'my_amount'})
571 1 0 if (defined $args{'my_currency'})
585 11 1 if ($self->ret_status eq 'SUCCESS' and not $self->ret_errorcode) { }
603 0 1 if ($self->ret_status eq 'ERROR') { }
655 0 15 unless ($self->ret_param_checksum)
660 1 14 unless $self->my_security_key
664 11 3 unless ($self->my_amount)
668 11 3 unless ($self->my_currency)
672 1 13 unless ($self->my_userid)
683 12 2 if ($expectedhash eq $self->ret_param_checksum) { }
742 2 3 unless ($url)
747 0 5 unless $url
749 0 5 unless $self->my_security_key
751 0 5 unless ($url and $self->my_security_key)
758 5 0 if ($url =~ /&ret_url_checksum=([A-Za-z0-9]+)$/) { }
767 4 1 if ($ourchecksum eq $checksum) { }
789 14 16 if (my $det = $self->$method)