mod_perlでレスポンスを返すための、最小限の設定
httpd.confに以下の設定をする。
LoadModule perl_module lib/httpd/mod_perl.so LoadModule apreq_module lib/httpd/mod_apreq2.so PerlSwitches -Mlib=/home/www <Location /hello> SetHandler perl-script PerlResponseHandler My::Hello </Location>
/home/www/My/Hello.pm を作る。
package My::Hello; use strict; use Apache2::RequestRec; use Apache2::RequestIO; use Apache2::Const -compile => 'OK'; sub handler : method { my ($class, $r) = @_; $r->content_type('text/plain'); print 'Hello, world'; return Apache2::Const::OK; } 1;
http://localhost/hello にアクセスすると、「Hello, world」を返してくる。