![]() |
![]()
| ![]() |
![]()
NAMEBusiness::OnlinePayment::Cardstream - Cardstream Plugin for Business::OnlinePayment SYNOPSISuse Business::OnlinePayment; my $Cardstream = new Business::OnlinePayment("Cardstream"); $Cardstream->content( type => 'visa', login => 'mylogin', passwd => 'mypassword', action => 'authorise', amount => '5.00', name => 'John Watson', address => '6 Elms, Oak Road.', card_number => '4725444499992827', expiration => '0112' #YYMM ); $Cardstream->submit; if ($Cardstream->is_success) { print "Success, Auth Code is ".$Cardstream->authorization; } else { print "Failed, Error message ".$Cardstream->error_message; } my @RESPONSE = split('\|',$Cardstream->server_response); my %response_hash = @RESPONSE; Supported CardsVisa, MasterCard, Switch (Check website for updates)Switch cards require issue number; $Cardstream->content(issue => '1') NOTESMerchant accountsA Cardstream merchant account is free of charge to set-up. Cardstream operates on a commission basis. Please see http://www.cardstream.com for pricing information, or contact sales@cardstream.com. Expiration datesCardstream.pm requires expiration dates in APACS/30 Standard format, which, unlike what is printed on the card, is YYMM. server-responseThe auth code and error messages are stored into $Cardstream->authorization and $Cardstream->error_message, however should you require more debugging information, server-response contains a pipe delimited hash consisting of the error code, text message from bank...etc. DESCRIPTIONFor detailed information see Business::OnlinePayment. AUTHORCraig R. Belcham, crb@cardstream.com. SEE ALSOperl(1). Business::OnlinePayment. http://www.cardstream.com for merchant account information.
|