|
NAMETest::WWW::Mechanize::CGI - Test CGI applications with Test::WWW::Mechanize SYNOPSIS use Test::More tests => 3;
use CGI;
use Test::WWW::Mechanize::CGI;
my $mech = Test::WWW::Mechanize::CGI->new;
$mech->cgi( sub {
my $q = CGI->new;
print $q->header,
$q->start_html('Hello World'),
$q->h1('Hello World'),
$q->end_html;
});
$mech->get_ok('http://localhost/');
$mech->title_is('Hello World');
$mech->content_contains('Hello World');
DESCRIPTIONProvides a convenient way of testing CGI applications without a external daemon. SEE ALSOAUTHORChristian Hansen, "ch@ngmedia.com" LICENSEThis library is free software. You can redistribute it and/or modify it under the same terms as perl itself.
|