PTR2IV 382 tools/perf/util/scripting-engines/trace-event-perl.c XPUSHs(sv_2mortal(newSViv(PTR2IV(scripting_context)))); PTR2IV 418 tools/perf/util/scripting-engines/trace-event-perl.c XPUSHs(sv_2mortal(newSViv(PTR2IV(scripting_context))));