| WebService-Buxfer documentation | view source | Contained in the WebService-Buxfer distribution. |
WebService::Buxfer::Response
my $response = WebService::Buxfer::Response->new(
$lwp_ua->request(
GET 'https://www.buxfer.com/transactions.json?token=XXX'
)
);
exit 1 unless $response->ok;
foreach ( $response->content->{response}->{transactions} ) {
print "Result: ".Data::Dumper::Dumper($_)."\n";
}
This is a simple class to encapsulate responses from the Buxfer webservice.
Given an HTTP::Response object, it will parse the returned data as required.
Returns the status string from Buxfer.
Parses buxfer_status() and checks the HTTP::Response status to determine
if the request was successful.
Move some of the logic out of WebService::Buxfer into here.
Add a pager for flipping through transactions based on 25 results per page and numTransactions in the response.
Portions of this package borrowed/adapted from the WebService::Solr::Response code.
Thanks to Brian Cassidy and Kirk Beers for that package.
Nathaniel Heinrichs <nheinric@cpan.org>
Copyright (c) 2009 Nathaniel Heinrichs. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| WebService-Buxfer documentation | view source | Contained in the WebService-Buxfer distribution. |