NAME
Finance::BitPay::IPN - Perl extension for blah blah blah
SYNOPSIS
# This is in a CGI script.
use Finance::BitPay::IPN;
use CGI;
my $ipn = Finance::BitPay::IPN->new;
my $invoice = $ipn->invoice;
if ($invoice) {
printf "Got invoice ID: %s\n", $invoice->{id};
# ... your code goes here ... #
}
else {
printf "Error: %s\n", $ipn->error;
}
###
# OR Write code like me and do this for your CGI script...
###
use base qw(Finance::BitPay::IPN);
main->new->go;
sub go {
my $self = shift;
if ($self->invoice) {
printf "Got invoice ID: %s\n", $self->request->{id};
# ... your code goes here ... #
else {
printf "Error: %s\n", $self->error;
}
}
DESCRIPTION
Author says:
I have no idea if this will work.
I have never used BitPay for real transactions.
i guess you just have to give it a whirl.
SEE ALSO
Finance::BitPay::API
Similar Modules: Coinbase::API, CaVirtex::API, BitStamp::API, BitStamp::Socket
AUTHOR
Jeff Anderson, <peawormsworth@gmail.com>
COPYRIGHT AND LICENSE
Copyright (C) 2014 by Jeff Anderson
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.14.2 or, at your option, any later version of Perl 5 you may have available.