15 lines
291 B
Perl
15 lines
291 B
Perl
use strict;
|
|
use warnings FATAL => 'all';
|
|
|
|
use Apache::Test;
|
|
use Apache::TestRequest;
|
|
|
|
plan tests => 1, need_php;
|
|
|
|
## multiply.php source:
|
|
## <?php $a=2; $b=4; $c=8; $d=$a*$b*$c; echo $d?>
|
|
##
|
|
## result should be '64' (2*4*8=64)
|
|
|
|
my $result = GET_BODY "/php/multiply.php";
|
|
ok $result eq '64';
|