summaryrefslogtreecommitdiffstats
path: root/debian/perl-framework/t/php/getenv.t
blob: 9d54878fe9af9abea2b6bd66798419ec2bb9d2e5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
use strict;
use warnings FATAL => 'all';

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

plan tests => 1, need_php;

# Regression test for http://bugs.php.net/bug.php?id=19840

ok t_cmp((GET_BODY "/php/getenv.php"),
         "GET",
         "getenv(REQUEST_METHOD)"
);