XS 1, mod_perl 1