NAME
Business::Payment::Processor::Test::True - Test Processor
SYNOPSIS
use
Business::Payment;
my
$bp
= Business::Payment->new(
processor
=> Business::Payment::Processor::Test::True->new
);
my
$charge
= Business::Payment::Charge->new(
amount
=> 10.00
# Something Math::Currency can parse
);
my
$result
=
$bp
->handle(
$charge
);
# Success!
DESCRIPTION
Business::Payment::Processor::Test::True is test processor that always succeeds.
AUTHOR
Cory G Watson, <gphat@cpan.org>
COPYRIGHT & LICENSE
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.