use strict; use warnings FATAL => 'all'; use Apache::Test; use Apache::TestRequest; use Apache::TestUtil; plan tests => 1, need_php; ## arg.php source: ## ## ## result should be ': ' for each arg sent. my @testargs = ('foo', 'b@r', 'testarg123-456-fu', 'ARGV', 'hello%20world'); my ($expected, $testargs) = ('',''); my $count = 0; foreach (@testargs) { $testargs .= "$_+"; $expected .= "$count: $_\n"; $count++; } chop($testargs); ## get rid of trailing '+' my $result = GET_BODY "/php/arg.php?$testargs"; ok t_cmp($result, $expected, "GET request for /php/arg.php?$testargs" );