in reply to Re: mod_perl questions
in thread mod_perl questions
You think?package Apache2::Hello; use strict; use warnings; use Apache2::RequestRec(); # for $r->content_type use Apache2::RequestIO(); # for $r->puts use Apache2::Const qw/:common/; use Apache2::Reload; sub handler { my $r = shift; my $time = scalar localtime(); my $package = __PACKAGE__; $r->content_type('text/html'); warn 'darn'; $r->puts(<<"END"); <HTML><BODY> <H3>Hello</H3> Hello from <B>$package</B>! The time is $time. </BODY></HTML> END return Apache2::Const::OK; } 1;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: mod_perl questions
by perrin (Chancellor) on Mar 30, 2007 at 13:01 UTC | |
by artemave (Beadle) on Mar 30, 2007 at 13:43 UTC | |
by perrin (Chancellor) on Mar 30, 2007 at 14:24 UTC |