The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
WWW-Pastebin-Many-Retrieve-0.002
River stage one • 1 direct dependent • 2 total dependents
++
/ WWW::Pastebin::Many::Retrieve

NAME

WWW::Pastebin::Many::Retrieve - retrieve pastes from many different pastebin sites

SYNOPSIS

    use strict;
    use warnings;

    use WWW::Pastebin::Many::Retrieve;

    my $paster = WWW::Pastebin::Many::Retrieve->new;

    my @pastes = qw(
        http://pastebin.ca/963177
        http://pastebin.com/d2fbd2737
        http://www.nomorepasting.com/getpaste.php?pasteid=10124
        http://pastie.caboo.se/172741
        http://phpfi.com/302683
        http://rafb.net/p/XU5KMo65.html
        http://paste.ubuntu-nl.org/61578/
    );

    for ( @pastes ) {
        print "Processing paste $_\n";

        $paster->retrieve( $_ )
            or warn $paster->error
            and next;

        print "Content on $_ is:\n$paster\n";
    }

DESCRIPTION

The module provides interface to retrieve pastes from several pastebins (see "SUPPORTED PASTEBINS" section) using a single method by giving it URI to the paste.

CONSTRUCTOR

new

    my $paster = WWW::Pastebin::Many::Retrieve->new;

    my $paster = WWW::Pastebin::Many::Retrieve->new( timeout => 20 );

Constructs and returns a new WWW::Pastebin::Many::Retrieve object. Takes one argument which is optional:

timeout

    my $paster = WWW::Pastebin::Many::Retrieve->new( timeout => 20 );

Optional. Specifies the timeout in seconds this will be passed into constructors for all the pastebin retrieving modules used under the hood. See "SUPPORTED PASTEBINS" section below. Defaults to: whatever the default is for particular pastebin retrieving module; usually it is 30 seconds.

METHODS

retrieve

    my $response = $paster->retrieve('http://uri_to_some_paste/')
        or die $paster->error;

Instructs the object to retrieve certain paste. Takes one mandatory argument which must be the URI pointing to the paste on one of the supported pastebin sites (see "SUPPORTED PASTEBINS" section). The return value on success will be what the return from retrieve() method of a particular pastebin retrieving module would return; this is differs enough to be useless thus use the content() method (see below) to obtain the content of the paste. On failure returns either undef or an empty list and the reason for failure will be available via error() method.

error

    my $response = $paster->retrieve('http://uri_to_some_paste/')
        or die $paster->error;

Takes no arguments, returns a human parsable message explaining why the call to retrieve() method failed.

response

    my $last_response = $paster->response;

Must be called after a successful call to retrieve(). Takes no arguments, returns the exact same thing last call to retrieve() returned.

content

    my $paste_content = $paster->content;

    print "Paste content is: $paster\n";

Must be called after a successful call to retrieve(). Takes no arguments, returns the content of the paste you retrived. This method is also overloaded as q|""| thus you can simply interpolate your object in a string to obtain the content of the paste.

SUPPORTED PASTEBINS

Note: this module no longer supports http://paste.css-standards.org/ pastebin as the site no longer exists.

Currently the module is able to retrieve pastes from the following pastebins:

http://pastebin.ca/963177

Handled by WWW::Pastebin::PastebinCa::Retrieve

http://pastebin.com/d2fbd2737

Handled by WWW::Pastebin::PastebinCom::Retrieve

http://www.nomorepasting.com/getpaste.php?pasteid=10124

Handled by WWW::Pastebin::NoMorePastingCom::Retrieve

http://pastie.caboo.se/172741

Handled by WWW::Pastebin::PastieCabooSe::Retrieve

http://phpfi.com/302683

Handled by WWW::Pastebin::PhpfiCom::Retrieve

http://rafb.net/p/XU5KMo65.html

Handled by WWW::Pastebin::RafbNet::Retrieve

http://paste.ubuntu-nl.org/61578/

Handled by WWW::Pastebin::UbuntuNlOrg::Retrieve

AUTHOR

Zoffix Znet, <zoffix at cpan.org> (http://zoffix.com, http://haslayout.net)

BUGS

Please report any bugs or feature requests to bug-www-pastebin-many-retrieve at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=WWW-Pastebin-Many-Retrieve. 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 WWW::Pastebin::Many::Retrieve

You can also look for information at:

COPYRIGHT & LICENSE

Copyright 2008 Zoffix Znet, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.