add support for PerlInitHandler