The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Business::OnlinePayment::OCV - OCV backend for Business::OnlinePayment

SYNOPSIS

use 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";
}

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.