WebService::GData::Error - create an error and parse errors from Google data APIs v2.
use WebService::GData::Error; #create an error object that you can throw by dying... my $error = new WebService::GData::Error(401,'Unauthorized'); # $error->code; # $error->content; #create an error object in response to a Google Service. my $error = new WebService::GData::Error(401,$responseFromAService); print $error->code; print $error->content;#raw xml content my @errors = $error->errors;#send back WebService::GData::Error::Entry objects foreach my $error (@{$error->errors}){ print $error->code; print $error->internalreason; print $error->domain; print $error->location->{type};#this is just a hash print $error->location->{content};#this is just a hash }
inherits from WebService::GData.
This package can parse error response from Google APIs service. You can also create your own basic error. All WebService::GData::* classes die a WebService::GData::Error object when something goes wrong. You should use an eval {}; block to catch the error.
Example:
use WebService::GData::Base; my $base = new WebService::GData::Base(); eval { $base->get($url); }; #$error is a WebService::GData::Error; if(my $error=$@){ #error->code,$error->content, $error->errors }
Create a WebService::GData::Error instance. Will parse the contents that you can access via the errors() method of the instance.
Parameters
code:*
content:Scalar
Returns
use WebService::GData::Error; #create an error object that you can throw by dying... my $error = new WebService::GData::Error(401,'Unauthorized');
Get back the error code.
none
code:Scalar
use WebService::GData::Error; #create an error object that you can throw by dying... my $error = new WebService::GData::Error(401,'Unauthorized'); $error->code;#401
Get back the raw content of the error.
When getting an error from querying one of Google data services, you will get a raw xml response containing possible errors. In such case,you should loop through the result by using the errors() instance which send back WebService::GData::Error::Entry.
use WebService::GData::Error; #create an error object that you can throw by dying... my $error = new WebService::GData::Error(401,'Unauthorized'); $error->content;#Unauthorized
Get back a reference array filled with WebService::GData::Error::Entry. When getting an error from querying one of Google data services, you will get an xml response containing possible errors. In such a case,you should loop through the result of errors. Errors always send back a reference array (even if there is no error).
my @errors = $error->errors;#send back WebService::GData::Error::Entry objects foreach my $error (@{$error->errors}){ print $error->code; print $error->internalreason; print $error->domain; print $error->location->{type};#this is just a hash print $error->location->{content};#this is just a hash }
If you do me the favor to _use_ this module and find a bug, please email me i will try to do my best to fix it (patches welcome)!
shiriru <shirirulestheworld[arobas]gmail.com>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
2 POD Errors
The following errors were encountered while parsing the POD:
=back without =over
To install WebService::GData, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WebService::GData
CPAN shell
perl -MCPAN -e shell install WebService::GData
For more information on module installation, please visit the detailed CPAN module installation guide.