use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../lib";

use Test::More;
use Catalyst::Test 'TestApp';

# body '0'
{
    my $res = request('/zerobody');
    is $res->content, '0';
    is $res->header('Content-Length'), '1';
}

# body ''
{
    my $res = request('/emptybody');
    is $res->content, '';

    SKIP: {
      skip "content-length for body of '' is now server dependent", 1;
      ok !defined $res->header('Content-Length');
    }
}

done_testing;