NAME
Business::OnlinePayment::PayflowPro - Verisign PayflowPro backend for Business::OnlinePayment
SYNOPSIS
use Business::OnlinePayment;
my $tx = new Business::OnlinePayment( 'PayflowPro',
'vendor' => 'your_vendor',
'partner' => 'your_partner',
'cert_path' => '/path/to/your/certificate/file/', #just the dir
);
$tx->content(
type => 'VISA',
action => 'Normal Authorization',
description => 'Business::OnlinePayment test',
amount => '49.95',
invoice_number => '100100',
customer_id => 'jsk',
name => 'Jason Kohles',
address => '123 Anystreet',
city => 'Anywhere',
state => 'UT',
zip => '84058',
email => 'ivan-payflowpro@420.am',
card_number => '4007000000027',
expiration => '09/04',
#advanced params
cvv2 => '420',
order_number => 'string', # returned by $tx->order_number() from an
# "authorization only" or
# "normal authorization" action, used by a
# "credit", "void", or "post authorization"
);
$tx->submit();
if($tx->is_success()) {
print "Card processed successfully: ".$tx->authorization."\n";
print "order number: ". $tx->order_number. "\n";
print "AVS code: ". $tx->avs_code. "\n"; # Y - Address and ZIP match
# A - Address matches but not ZIP
# Z - ZIP matches bu tnot address
# N - no match
# E - AVS error or unsupported
# (null) - AVS error
print "CVV2 code: ". $tx->cvv2_code. "\n";
} else {
print "Card was rejected: ".$tx->error_message;
print " (CVV2 mismatch)" if $tx->result_code == 114;
print "\n";
}
SUPPORTED TRANSACTION TYPES
Visa, MasterCard, American Express, JCB, Discover/Novus, Carte blanche/Diners Club, CC
SUPPORTED ACTIONS
Normal Authorization, Authorization Only, Post Authorization, Credit, Void
DESCRIPTION
For detailed information see Business::OnlinePayment.
COMPATIBILITY
This module implements an interface to the PayflowPro Perl API, which can be downloaded at https://manager.verisign.com/ with a valid login.
BUGS
AUTHOR
Ivan Kohler <ivan-payflowpro@420.am>
Based on Busienss::OnlinePayment::AuthorizeNet written by Jason Kohles.
SEE ALSO
perl(1), Business::OnlinePayment.