8 use Catalyst::Test qw/TestAppEncoding/;
10 if ( $ENV{CATALYST_SERVER} ) {
11 plan skip_all => 'This test does not run live';
15 my $fn = "$Bin/../catalyst_130pix.gif";
16 ok -r $fn, 'Can read catalyst_130pix.gif';
19 my $r = request('/binary');
20 is $r->code, 200, '/binary OK';
21 is $r->header('Content-Length'), $size, '/binary correct content length';
24 my $r = request('/binary_utf8');
25 is $r->code, 200, '/binary_utf8 OK';
26 is $r->header('Content-Length'), $size, '/binary_utf8 correct content length';