Catalyst::Test - Test Catalyst Applications # Helper script/test.pl # Tests use Catalyst::Test 'TestApp'; request('index.html'); get('index.html'); # Run tests against a remote server CATALYST_SERVER='http://localhost:3000/' prove -r -l lib/ t/ # Tests with inline apps need to use Catalyst::Engine::Test package TestApp; use Catalyst; sub foo : Global { my ( $self, $c ) = @_; $c->res->output('bar'); } __PACKAGE__->setup(); package main; use Test::More tests => 1; use Catalyst::Test 'TestApp'; ok( get('/foo') =~ /bar/ ); Test Catalyst Applications.

METHODS

get
Returns the content. my $content = get('foo/bar?test=1');

request
Returns a "HTTP::Response" object. my $res = request('foo/bar?test=1');

local_request

remote_request
Do an actual remote request using LWP. Catalyst. Sebastian Riedel, "sri@cpan.org" This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.