my $tx = new Business::OnlinePayment("Network1Financial");
$tx->content(
type => 'VISA',
- login => '999999999999',
- password => 'AAAAAAAAAAAA',
+ login => '999999999996',
+ password => 'J4BGW3Q2K8N4',
action => 'Normal Authorization',
description => 'Business::OnlinePayment visa test',
amount => '49.95',
customer_id => 'jsk',
first_name => 'Tofu',
last_name => 'Beast',
+ 'name' => 'Tofu Beast',
address => '123 Anystreet',
city => 'Anywhere',
state => 'UT',
zip => '84058',
- card_number => '4111111111111',
- expiration => '01/05',
+ card_number => '4111111111111111',
+ expiration => '04/05',
);
$tx->test_transaction(1); # test, dont really charge
$tx->submit();