#!c:/Perl/bin

package Optrack;

use Apache2::RequestRec;
use Apache2::Const;

sub handler
{
		my $r = shift;
		$r->content_type("text/html");
		print "Hello World\n";
                return Apache2::OK;
}
1;