blob: 3ab77963d3cfe821caa7b26aca645c73b259e36e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
use strict;
use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestRequest;
use Apache::TestUtil qw(t_cmp t_write_file);
use File::Spec;
my @testcases = (
['/modules/cgi/xother.pl' => 'HELLOWORLD'],
['/modules/filter/bytype/test.txt' => 'HELLOWORLD'],
['/modules/filter/bytype/test.xml' => 'HELLOWORLD'],
['/modules/filter/bytype/test.css' => 'helloworld'],
['/modules/filter/bytype/test.html' => 'helloworld'],
);
plan tests => scalar @testcases, need need_cgi,
need_module('mod_filter'),
need_module('mod_case_filter');
foreach my $t (@testcases) {
my $r = GET_BODY($t->[0]);
chomp $r;
ok t_cmp($r, $t->[1]);
}
|