Business::Payment::Processor::Test::False - Test Processor
use Business::Payment; my $bp = Business::Payment->new( processor => Business::Payment::Processor::Test::False->new ); my $charge = Business::Payment::Charge->new( amount => 10.00 # Something Math::Currency can parse ); my $result = $bp->handle($charge); print "Failed: ".$result->error_code.": ".$result->error_message."\n";
Business::Payment::Processor::Test::False is test processor that always fails.
Cory G Watson,
Copyright 2009 Cold Hard Code, LLC, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.