compare PerlInterpreter pointers without casting