NAME

Net::Twitpic - The great new Net::Twitpic!

VERSION

Version 0.01

SYNOPSIS

Easily upload photos to Twitpic.

Perhaps a little code snippet.

use Net::Twitpic;

my $tp = Net::Twitpic->new(
    twitpic_api => $twitpic_api,        # get from Twitpic Developers
    consumer_key => $consumer_key,      # get from dev.twitter.com
    consumer_secret => $consumer_secret # get from dev.twitter.com
);
$tp->upload(
    oauth_token => $oauth_token,        # get from API transaction
    oauth_secret => $oauth_secret,      # get from API transaction
    file => $filename,                  # photo file path
    message => $message                 # message attached to Twitpic
);
if ($tp->is_success) {
    print $tp->info->{'url'};
}

SUBROUTINES/METHODS

new

Construct new Net::Twitpic object.

upload

Upload the photo saved locally with message (both required). Specify OAuth token and OAuth secret you have aquired for your twitter-associated user.

is_success

Return true if the request has been proccessed correctly.

info

Return uploaded info as hash.

AUTHOR

Yusuke Sugiyama, <ally at blinkingstar.net>

BUGS

Please report any bugs or feature requests to bug-net-twitpic at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-Twitpic. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Net::Twitpic

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

Copyright 2010 Yusuke Sugiyama.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.