Daniel Torres Sandi

NAME

Net::Reddit - reddit interface (No API) .

SYNOPSIS

Usage:

   use Net::Reddit;
   $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0;
   my $reddit = Net::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 = Net::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