package ModPerl::ROOT::ModPerl::PerlRun::home_jjmoka_TEST_code_test2_2epl;sub handler {local $0 = '/home/jjmoka/TEST/code/test2.pl'; #line 1 /home/jjmoka/TEST/code/test2.pl #!/usr/bin/perl my $a=2; print "Content-type: text/plain\n\n"; print "$a\n";