|
NAMEWWW::Mechanize::Plugin::HelloWorld - a sample WWW::Mechanize::Pluggable plugin-head1 SYNOPSIS use WWW::Mechanize::Pluggable; # This module is automatically loaded into WWW::Mechanize::Pluggable DESCRIPTIONThis module shows how to mess with the "WWW::Mechanize" object contained within the "WWW::Mechanize::Pluggable" object.Further refinements are left to the reader. Note that the fields in the "WWW::Mechanize::Pluggable" object are also available to the plugins. USAGEmy $mech = new WWW::Mechanize::Pluggable; $mech->hello_world; # $mech->content now eq 'hello world' BUGSNone known.SUPPORTContact the author at "mcmahon@yahoo-inc.com".AUTHORJoe McMahon mcmahon@yahoo-inc.com COPYRIGHTCopyright 2005 by Joe McMahon and Yahoo!This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module. SEE ALSOWWW::Mechanize::Pluggable, "WWW::Mechanize"CLASS METHODSimportThis function snags any 'helloworld' key-value pair off the "use WWW::Mechanize" line and sets the "HELLO" key to it.Currently this uses a global variable in the "WW::Mechanize::Pluggable" namespace to capture the value. This is icky and should be replaced with something more elegant. initThe "init()" function exports "hello_world" into the caller's namespace.hello_worldJust a demonstration function; replaces the current content with 'hello world'. It should be noted that this is not going to pass most tests for "successfully fetched page" because "WWW::Mechanize" hasn't processed a valid request-response pair.
Visit the GSP FreeBSD Man Page Interface. |