NAME
Flickr::Upload - Upload images to flickr.com
SYNOPSIS
use LWP::UserAgent;
use Flickr::Upload qw(upload);
my $ua = LWP::UserAgent->new;
upload(
$ua,
'photo' => '/tmp/image.jpg',
'email' => 'self@example.com',
'password' => 'pr1vat3',
'tags' => 'me myself eye',
'is_public' => 1,
'is_friend' => 1,
'is_family' => 1
) or die "Failed to upload /tmp/image.jpg";
DESCRIPTION
Upload an image to flickr.com.
FUNCTIONS
upload
upload(
$ua,
'photo' => '/tmp/image.jpg',
'email' => 'self@example.com',
'password' => 'pr1vat3',
'tags' => 'me myself eye',
'is_public' => 1,
'is_friend' => 1,
'is_family' => 1
);
Taking a LWP::UserAgent as an argument ($ua
), this is basically a direct interface to the Flickr Photo Upload API. Required parameters are photo
, email
, and password
. uri
may be provided if you don't want to use the default, http://www.flickr.com/tools/uploader_go.gne (i.e. you have a custom server running somewhere that supports the API).
Returns non-zero on success, undef
on failure.
SEE ALSO
http://flickr.com/services/api/.
AUTHOR
Christophe Beauregard, cpb@cpan.org
COPYRIGHT AND LICENSE
This module is not an official Flickr.com (or Ludicorp) service. I'm sure if they knew about it they could suggest some additional words saying just how little they're responsible for anything that might go wrong with this code.
Copyright (C) 2004 by Christophe Beauregard
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.