add PERL_NO_GET_CONTEXT for efficiency