Help for this page
<Location /app> SetHandler perl-script PerlHandler Sample::Dispatch </Location>
package Sample::Dispatch; use strict; ... } 1;
package Sample::Application; use strict; ... } 1;