diff options
Diffstat (limited to 't')
| -rwxr-xr-x | t/SMOKE | 21 | ||||
| -rw-r--r-- | t/TEST.PL | 10 | ||||
| -rw-r--r-- | t/basic.t | 21 | ||||
| -rw-r--r-- | t/conf/extra.conf.in | 1 | ||||
| -rw-r--r-- | t/conf/extra.last.conf.in | 4 | ||||
| -rw-r--r-- | t/htdocs/foot.html | 2 | ||||
| -rw-r--r-- | t/htdocs/head.html | 2 |
7 files changed, 61 insertions, 0 deletions
@@ -0,0 +1,21 @@ +#!/usr/local/bin/perl +# WARNING: this file is generated, do not edit +# generated on Sat Apr 24 00:40:18 2021 +# 01: /usr/local/lib/perl5/site_perl/mach/5.32/Apache/TestConfig.pm:1003 +# 02: /usr/local/lib/perl5/site_perl/mach/5.32/Apache/TestConfig.pm:1095 +# 03: /usr/local/lib/perl5/site_perl/mach/5.32/Apache/TestSmoke.pm:775 +# 04: /usr/local/lib/perl5/site_perl/mach/5.32/Apache/TestMM.pm:143 +# 05: Makefile.PL:12 + +BEGIN { eval { require blib && blib->import; } } + +use strict; +use warnings FATAL => 'all'; + +use lib qw( + /root/prj/Apache-Inject +); + + +use Apache::TestSmoke; +Apache::TestSmoke->new(@ARGV)->run;
\ No newline at end of file diff --git a/t/TEST.PL b/t/TEST.PL new file mode 100644 index 0000000..6c1c41c --- /dev/null +++ b/t/TEST.PL @@ -0,0 +1,10 @@ +#!perl + +use strict; +use warnings FATAL => 'all'; + +use lib qw(lib); + +use Apache::TestRunPerl (); + +Apache::TestRunPerl->new->run(@ARGV); diff --git a/t/basic.t b/t/basic.t new file mode 100644 index 0000000..f6e289f --- /dev/null +++ b/t/basic.t @@ -0,0 +1,21 @@ +use strict; +use warnings FATAL => 'all'; + +use Apache::Test; +use Apache::TestUtil; +use Apache::TestRequest qw/GET_BODY/; + +plan tests => 2; + +ok 1; + +open my $t, '<', 't/htdocs/test.html' or die; +open my $h, '<', 't/htdocs/head.html' or die; +open my $f, '<', 't/htdocs/foot.html' or die; +my $test = do { local $/; <$t> }; +my $head = do { local $/; <$h> }; +my $foot = do { local $/; <$f> }; +close $t; close $h; close $f; + +my $body = GET_BODY '/test.html'; +ok $body, "$head$test$foot", 'Body of test.html includes header and footer'; diff --git a/t/conf/extra.conf.in b/t/conf/extra.conf.in new file mode 100644 index 0000000..fe9de1d --- /dev/null +++ b/t/conf/extra.conf.in @@ -0,0 +1 @@ +PerlSwitches -I@ServerRoot@/../lib diff --git a/t/conf/extra.last.conf.in b/t/conf/extra.last.conf.in new file mode 100644 index 0000000..0156023 --- /dev/null +++ b/t/conf/extra.last.conf.in @@ -0,0 +1,4 @@ +PerlLoadModule Apache::Inject +<FilesMatch ".*\.html"> + Inject head.html foot.html +</FilesMatch> diff --git a/t/htdocs/foot.html b/t/htdocs/foot.html new file mode 100644 index 0000000..77ef8be --- /dev/null +++ b/t/htdocs/foot.html @@ -0,0 +1,2 @@ +<hr/> +<p>Copyright © Site Owner</p> diff --git a/t/htdocs/head.html b/t/htdocs/head.html new file mode 100644 index 0000000..b4abf3f --- /dev/null +++ b/t/htdocs/head.html @@ -0,0 +1,2 @@ +<h1>Site Header</h1> +<hr/> |