NAME
Business::OnlinePayment::OCV - OCV backend for Business::OnlinePayment
SYNOPSIS
my
$tx
= new Business::OnlinePayment(
"OCV"
);
$tx
->content(
type
=>
'CC'
,
login
=>
'test'
,
#ClientID
action
=>
'Authorization Only'
,
description
=>
'Business::OnlinePayment test'
,
amount
=>
'49.95'
,
invoice_number
=>
'100100'
,
name
=>
'Tofu Beast'
,
card_number
=>
'4007000000027'
,
expiration
=>
'09/02'
,
);
$tx
->submit();
if
(
$tx
->is_success()) {
"Card processed successfully: "
.
$tx
->authorization.
"\n"
;
}
else
{
"Card was rejected: "
.
$tx
->error_message.
"\n"
;
}
DESCRIPTION
For detailed information see Business::OnlinePayment.
NOTE
COMPATIBILITY
This module is a wrapper around Business::OCV written by Benjamin Low <b.d.low@unsw.edu.au>. Eventually it will be self-contained. See <INSERTURLHERE> for details.
AUTHOR
Ivan Kohler <ivan-ocv@420.am>
SEE ALSO
perl(1). Business::OnlinePayment, Business::OCV.