projects
/
catagits/Catalyst-Controller-WrapCGI.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
C::C::CGIBin - added test for __DATA__ (failing for some reaosn)
[catagits/Catalyst-Controller-WrapCGI.git]
/
t
/
wrap-cgi.t
1
#!perl
2
3
use strict;
4
use warnings;
5
6
use FindBin '$Bin';
7
use lib "$Bin/lib";
8
9
use Test::More tests => 1;
10
11
use Catalyst::Test 'TestApp';
12
use HTTP::Request::Common;
13
14
my $response = request POST '/cgi-bin/test.cgi', [
15
foo => 'bar',
16
bar => 'baz'
17
];
18
19
is($response->content, 'foo:bar bar:baz', 'POST to CGI');