The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use Test::More tests => 4;

BEGIN { use_ok 'Catalyst::Test', 'Perldoc::Server' }
BEGIN { use_ok 'Perldoc::Server::Controller::Index' }

ok( request('/index/modules/A')->is_success, 'Request should succeed' );
ok( request('/index/functions')->is_success, 'Request should succeed' );