![]() |
![]()
| ![]() |
![]()
NAMEBusiness::OnlinePayment::OCV - OCV backend for Business::OnlinePayment SYNOPSISuse Business::OnlinePayment; 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()) { print "Card processed successfully: ".$tx->authorization."\n"; } else { print "Card was rejected: ".$tx->error_message."\n"; } DESCRIPTIONFor detailed information see Business::OnlinePayment. NOTECOMPATIBILITYThis 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. AUTHORIvan Kohler <ivan-ocv@420.am> SEE ALSOperl(1). Business::OnlinePayment, Business::OCV.
|