WebService::Gravatar - Perl interface to Gravatar API
Version 0.10
WebService::Gravatar provides an interface to Gravatar XML-RPC API.
use WebService::Gravatar; # Create a new instance of WebService::Gravatar my $grav = WebService::Gravatar->new(email => 'your@email.address', apikey => 'your_API_key'); # Get a list of addresses my $addresses = $grav->addresses; if (defined $addresses) { # Print the userimage URL for each e-mail address foreach my $email (keys %$addresses) { print $addresses->{$email}->{'userimage_url'} . "\n"; } } else { # We have a problem print STDERR "Error: " . $grav->errstr . "\n"; } # Read image file data my $data; { local $/ = undef; open(F, "< my_pretty_face.png"); $data = <F>; close(F); } # Save the image as a new userimage $grav->save_data(data => $data, rating => 0); ...
WebService::Gravatar is a Perl interface to Gravatar API. It aims at providing a close representation of the basic XML-RPC API, as documented on Gravatar website: http://en.gravatar.com/site/implement/xmlrpc/. All the method names, parameter names, and data structures are the same as in the API -- the only exception is that in the API the methods are named with camelCase, while the module uses lowercase_with_infix_underscores.
All the instance methods return undef on failure. More detailed error information can be obtained by calling "err" and "errstr".
undef
Creates a new instance of WebService::Gravatar.
my $grav = WebService::Gravatar->new(email => 'your@email.address', apikey => 'your_API_key');
Parameters:
email
(Required) E-mail address.
apikey
(Required) API key. Can be ommitted if password is defined.
password
(Required) Account password. Can be ommitted if apikey is defined.
Checks whether a hash has a gravatar.
$result = $grav->exists(hashes => ['e52beb5a6966554a02a56072cafebabe', '62345cdd79773f62a87fcbc6abadbabe'])
hashes
(Required) An array of email hashes to check.
Returns: A reference to a hash that maps email hashes to statuses. Example:
$result = { 'e52beb5a6966554a02a56072cafebabe' => '1', '62345cdd79773f62a87fcbc6abadbabe' => '0' };
Gets a list of addresses for this account.
$addresses = $grav->addresses;
Returns: A reference to a hash that maps addresses to userimage data. Example:
$addresses = { 'some@email.address' => { 'rating' => '0', 'userimage' => '8bfc8da2562a53ddd7e630a68badf00d', 'userimage_url' => 'http://en.gravatar.com/userimage/123456/8bfc8da2562a53ddd7e630a68badf00d.jpg' }, 'another@email.address' => { 'rating' => '1', 'userimage' => '90f269fe7b67d0ce49f96427deadbabe', 'userimage_url' => 'http://en.gravatar.com/userimage/123456/90f269fe7b67d0ce49f96427deadbabe.jpg' } };
Gets a list of userimages for this account.
$userimages = $grav->userimages;
Returns: A reference to a hash that maps userimages to data. Example:
$userimages = { '8bfc8da2562a53ddd7e630a68badf00d' => [ '0', 'http://en.gravatar.com/userimage/123456/8bfc8da2562a53ddd7e630a68badf00d.jpg' ], '90f269fe7b67d0ce49f96427deadbabe' => [ '1', 'http://en.gravatar.com/userimage/123456/90f269fe7b67d0ce49f96427deadbabe.jpg' ] };
Saves binary image data as a userimage for this account.
$grav->save_data(data => $data, rating => 1);
data
(Required) A base64 encoded image.
rating
(Required) Rating.
Returns: Userimage string.
Reads an image via its URL and saves that as a userimage for this account.
$grav->save_url(url => 'http://some.domain.com/image.png', rating => 0);
url
(Required) A full URL to an image.
Uses the specified userimage as a gravatar for one or more addresses on this account.
$grav->use_userimage(userimage => '9116aa83a568563290a681df61c0ffee'. addresses => ['some@email.address', 'another@email.address']);
userimage
(Required) The userimage to be used.
addresses
(Required) An array of email addresses for which this userimage will be used.
Returns: 1 on success, undef on failure.
Removes the userimage associated with one or more email addresses.
$result = $grav->remove_image(addresses => ['some@email.address', 'another@email.address'])
(Required) An array of email addresses to remove userimages for.
Returns: A reference to a hash that maps email addresses to statuses. Example:
result = { 'some@email.address' => 1, 'another@email.address' => 0 };
Removes a userimage from the account and any email addresses with which it is associated.
$grav->delete_userimage(userimage => '292ed56ce849657d47b04105deadbeef');
(Required) The userimage to be removed from the account.
API test method.
$result = $grav->test(param => 1);
Returns: A reference to a hash which represents the parameters passed to the test method.
Returns the numeric code of last error.
$err_code = $grav->err;
Returns the human readable text for last error.
$err_description = $grav->errstr;
Michal Wojciechowski, <odyniec at cpan.org>
<odyniec at cpan.org>
Please report any bugs or feature requests to bug-webservice-gravatar at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=WebService-Gravatar. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
bug-webservice-gravatar at rt.cpan.org
You can find documentation for this module with the perldoc command.
perldoc WebService::Gravatar
You can also look for information at:
RT: CPAN's request tracker
http://rt.cpan.org/NoAuth/Bugs.html?Dist=WebService-Gravatar
AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/WebService-Gravatar
CPAN Ratings
http://cpanratings.perl.org/d/WebService-Gravatar
Search CPAN
http://search.cpan.org/dist/WebService-Gravatar
Copyright 2010 Michal Wojciechowski, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Gravatar XML-RPC API Documentation
http://en.gravatar.com/site/implement/xmlrpc/
To install WebService::Gravatar, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WebService::Gravatar
CPAN shell
perl -MCPAN -e shell install WebService::Gravatar
For more information on module installation, please visit the detailed CPAN module installation guide.