NAME
Catalyst::Test - Test Catalyst applications
SYNOPSIS
# 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 -l lib/ t/
# Tests with inline apps need to use Catalyst::Engine::Test
package TestApp;
use Catalyst qw[-Engine=Test];
__PACKAGE__->action(
foo => sub {
my ( $self, $c ) = @_;
$c->res->output('bar');
}
);
package main;
use Test::More tests => 1;
use Catalyst::Test 'TestApp';
ok( get('/foo') =~ /bar/ );
DESCRIPTION
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');
- remote_request
-
Do an actual remote rquest using LWP.
SEE ALSO
AUTHOR
Sebastian Riedel, sri@cpan.org
COPYRIGHT
This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.