Branch Coverage

blib/lib/Business/OnlinePayment/IPayment.pm
Criterion Covered Total %
branch 40 62 64.5


line true false branch
174 43 3 if (defined $adminpass)
309 3 12 if ($self->trx_obj->options)
318 0 15 unless ($res and ref $res eq 'HASH' and exists $res->{'createSessionResponse'}{'sessionId'})
356 0 21 unless (defined $number)
360 0 21 unless $op
366 13 8 if ($amount)
368 0 13 unless $amount =~ /^[1-9][0-9]*$/s
370 2 11 unless ($currency)
373 0 13 unless ($currency =~ /^[A-Z]{3}$/s)
381 9 0 if ($trxdetails and ref $trxdetails eq 'HASH' and %$trxdetails)
385 9 0 unless ($trxdata{$k})
393 0 13 unless $op eq 'capture' or $op eq 'refund' or $op eq 'reverse'
400 21 0 if ($res and ref $res eq 'HASH' and exists $$res{"${op}Response"}{'ipaymentReturn'}) { }
427 0 3 unless $id
442 0 3 if ($self->trx_obj->options)
453 3 0 if ($res and ref $res eq 'HASH' and exists $$res{"${op}Response"}{'ipaymentReturn'}) { }
476 0 3 unless $id
485 3 0 if ($res and ref $res eq 'HASH' and exists $$res{"${op}Response"}{'expireDatastorageReturn'})
546 26 16 if $obj
559 0 45 unless $op
570 0 45 unless $hash{$op}
632 0 12 unless ($self->app_security_key)
691 11 0 if (@args == 1) { }
0 0 elsif (@args % 2 == 0) { }
704 11 0 unless (exists $details{'my_security_key'})
707 11 0 unless (exists $details{'my_userid'})
746 2 8 unless $self->trx_obj
747 4 4 if (@_ == 1)
751 2 6 unless $country =~ /^[A-Z]{2,3}$/s
752 2 4 if ($country eq 'UK') { }
2 2 elsif ($country eq 'EI') { }