package Apache::Hello; use strict; use Apache::Constants qw(:common); use Apache::Connection; sub handler { my $r = shift; my $local_addr = $r->connection->remote_ip; # $local_addr = "hard coded"; $r->content_type('text/html'); $r->send_http_header; $r->print(< HELLO THERE

Hello $local_addr

END return OK; } 1; __END__