The code snippet below is missing a bunch of the information you're supposed to pass through, but its not relevant for our immediate purposes.
This code is, of course, contrived, and only for demonstration purposes. My actual code has a single instance stored in a subroutine which I call to and pass along the transaction details.my $tx = new Business::OnlinePayment("AuthorizeNet"); $tx->content( type => $cardtype, login => $login, password => $pass, amount => $amount, card_number => $ccnum, expiration => $ccexp); $tx->submit(); if($tx->is_success()) { &do_something; } else { &another; } $tx = new Business::OnlinePayment("AuthorizeNet"); $tx->content( type => $cardtype, login => $login, password => $pass, amount => $amount, card_number => $ccnum, expiration => $ccexp); $tx->submit if($tx->is_success()) { &do_something; } else { &another; }
Plus a number more I didn't want to spam you all with.Subroutine server_response redefined at (eval 19) line 1. Subroutine path redefined at (eval 20) line 1. Subroutine require_avs redefined at (eval 21) line 1. Subroutine port redefined at (eval 22) line 1.
While these errors aren't fatal, I know it shouldn't doing this... Can anyone enlighten me what I can do to the module to "fix" this... Or whether its safe to simply ignore them...
My thanks,
JP
-- Alexander Widdlemouse undid his bellybutton and his bum dropped off --
In reply to Business::OnlinePayment redefined subroutines, or the little module that doesn't like being used twice by JPaul
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |