summaryrefslogtreecommitdiffstats
path: root/debian/perl-framework/t/security/CVE-2006-5752.t
blob: 911f59f19962007438a1c11da61ae1f5705132c0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
use strict;
use warnings FATAL => 'all';

use Apache::Test;
use Apache::TestUtil;
use Apache::TestRequest;

plan tests => 2, need_module 'status';

my $r;

$r = GET "/server-status";

ok t_cmp($r->code, 200, "server-status gave response");

ok t_cmp($r->header("Content-Type"), qr/charset=/, "response content-type had charset");