SYNOPSIS

use Business::OnlinePayment;
####
# One step transaction, the simple case.
####
my $tx = new Business::OnlinePayment("OpenECHO");
$tx->content(
type => 'VISA',
login => '1234684752',
password => '43400210',
action => 'Normal Authorization',
description => 'Business::OnlinePayment test',
amount => '49.95',
invoice_number => '100100',
customer_id => 'jsk',
first_name => 'Tofu',
last_name => 'Beast',
address => '123 Anystreet',
city => 'Anywhere',
state => 'UT',
zip => '84058',
card_number => '4005550000000019',
expiration => '08/06',
cvv2 => '1234', #optional
referer => 'http://valid.referer.url/',
);
$tx->submit();
if($tx->is_success()) {
print "Card processed successfully: ".$tx->authorization."\n";
} else {
print "Card was rejected: ".$tx->error_message."\n";
}

SUPPORTED TRANSACTION TYPES

CC, Visa, MasterCard, American Express, Discover

Content required: type, login, password, action, amount, first_name, last_name, card_number, expiration.

Check

Content required: type, login, password, action, amount, first_name, last_name, account_number, routing_code, bank_name. (...more)

PREREQUISITES

  URI::Escape
  Tie::IxHash
  Net::SSLeay _or_ ( Crypt::SSLeay and LWP )

DESCRIPTION

For detailed information see Business::OnlinePayment.

AUTHOR

Original Author Michael Lehmkuhl <[email protected]>

Special Thanks Jim Darden <[email protected]> Dan Browning <[email protected]>

Business::OnlinePayment Implementation Ivan Kohler <[email protected]>