NAME

Test::WWW::Mechanize::Runner - test-suites maker for "WWW::Mechanize"-compatible agents.

DESCRIPTION

This module is designed to help you write functional test-suites for web-applications without getting stuck with a specific WWW::Mechanize agent.

You write the scenario in your module (that inherits from the runner) and define suites.

Then, you can easily write your test script with 3 lines.

EXAMPLE

First, write a scenario with the runner :

    package TestGoogle;
    use Test::Simple;
    use Test::WWW::Mechanize::Runner;
    use base 'Test::WWW::Mechanize::Runner'; # this may become automatic in
                                             # future versions
    
    suite google_homepage => sub {
        # you receive the agent defined for the session 
        my ($agent) = @_;

        ok( $agent->get('http://www.google.com'), 
            'GET http://www.google.com' );
        ok($agent->form_number(1), 'select the form' );
        # ... 
    };

    1;

Then you can write your test script for running the suite with the agent you like:

    test-google-mozilla.t:

    use TestGoogle;
    TestGoogle->init('mozilla');
    TestGoogle->run(@ARGV);

The test suite is then run with a Mozilla::Mechanize agent, if possible.

You can also name the test suites you want to run if you want to run only a specific set of suites, instead of all of them:

    $ perl test-google-mozilla.t                 # will run all the test suites defined
    $ perl test-google-mozilla.t google_homepage # will only run "google_homepage"

SUPPORTED AGENTS

In this version the following agents are supported :

default : WWW::Mechanize
mozilla : Mozilla::Mechanize
msie : Win32::IE::Mechanize
mozilla-gui : Mozilla::Mechanize::GUITester

AUTHOR

This module was written by Alexis Sukrieh <sukria+perl@sukria.net>.

COPYRIGHT AND LICENSE

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

CPAN RT