9 use Test::More tests => 2;
11 use Catalyst::Test 'TestPlugin';
12 use HTTP::Request::Common;
14 my $response = request POST '/cgi-bin/test.pl', [
19 is($response->content, 'foo:bar bar:baz', 'POST to Perl CGI File');
21 is(get('/cgi-bin/test.sh'), "Hello!\n", 'Non-Perl CGI File');