use FindBin '$Bin';
use lib "$Bin/lib";
-use Test::More tests => 2;
+use Test::More tests => 3;
# Test configurable path root and dir
{ package root_test;
is($response->content, 'foo:bar bar:baz', 'POST to Perl CGI File 2');
}
+
+# test yet another variation on specifying the root path
+{ package root_test_3;
+
+ use Test::More;
+ use HTTP::Request::Common;
+ use Catalyst::Test 'TestCGIBinRoot3';
+
+ my $response = request POST '/cgi/path/test.pl', [
+ foo => 'bar',
+ bar => 'baz'
+ ];
+
+ is($response->content, 'foo:bar bar:baz', 'POST to Perl CGI File 3');
+}