![]() |
![]()
| ![]() |
![]()
NAMEApp::Nopaste::Service - base class for nopaste services VERSIONversion 1.013 SYNOPSISpackage App::Nopaste::Service::Shadowcat; use parent 'App::Nopaste::Service'; sub uri { "http://paste.scsys.co.uk/" } DESCRIPTION"App::Nopaste::Service" defines a generic interface for uploading to nopaste sites. It provides a default interface to that of the POE Pastebot. METHODSnopasteThis is the outermost method called by App::Nopaste and other clients. You should not override this method, as it will (XXX: eventually) perform canonicalization of arguments (such as "lang") for you. run args -> (OK, message)This is the outermost method you should override. You'll be passed a hash of arguments. The only arguments you should pay attention to are: get mech, argsThis should "get" the form to paste using the provided WWW::Mechanize object. By default it does just that. See "uri" below. uriIf you only need to call "mech->get(uri)" then you may define this method to provide the URI of the nopaste service. fill_form mech, argsThis should have the WWW::Mechanize fill in the form using the arguments, and submit it. return mech, argsThis should look at "WWW::Mechanize->content" to find the URI to the pasted text. SUPPORTBugs may be submitted through the RT bug tracker <https://rt.cpan.org/Public/Dist/Display.html?Name=App-Nopaste> (or bug-App-Nopaste@rt.cpan.org <mailto:bug-App-Nopaste@rt.cpan.org>). AUTHORShawn M Moore, <sartak at gmail.com> COPYRIGHT AND LICENSEThis software is copyright (c) 2008 by Shawn M Moore. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
|