NAME
WWW::reddit - reddit interface (No API) .
SYNOPSIS
Usage:
use www::reddit;
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0;
my $reddit = reddit->new( username => 'Reddit_user' ,
password => 'Reddit_pass',
Captcha_username => "deathcaptcha_user",
Captcha_pass => "deathcaptcha_pass");
You need a valid deathcaptcha account to solve reddit captchas
DESCRIPTION
reddit interface (No API)
FUNCTIONS
constructor
my $reddit = www::reddit->new( username => 'Reddit_user' ,
password => 'Reddit_pass',
Captcha_username => "deathcaptcha_user",
Captcha_pass => "deathcaptcha_pass!");
To get your deathcaptcha account
www.deathbycaptcha.com
login
$reddit->login;
Login to the site. You MUST call this function before to do anything
submit
$title = "new title";
$subreddit = "linux";
$url = "http://linux.com";
$url_post = $reddit->submit($title,$url,$subreddit);
print "url_post $url_post \n";
Submit a url
comment
$reddit_url = "http://www.reddit.com/r/linux/comments/XXXXX";
$comment = "Linux forever ";
$reddit->comment($reddit_url,$comment);
Comment a reddit entry
vote
$reddit_url = "http://www.reddit.com/r/linux/comments/XXXXX";
$reddit->vote($reddit_url,1);
Vote for a reddit entry
dispatch
Internal function
LICENSE
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html