Re^2: Getting perl file path from Function

I just saw this post. I tried this and it returned the wrong file path. It wasnt the script that the function was in.

SV = RV(0x1ee3f430) at 0x1ee8f8c0
  REFCNT = 1
  FLAGS = (TEMP,ROK)
  RV = 0x1ee8fbc0
  SV = PVCV(0x1ee66a10) at 0x1ee8fbc0
    REFCNT = 2
    FLAGS = ()
    IV = 0
    NV = 0
    COMP_STASH = 0x1a6ad180     "main"
    ROOT = 0x0
    XSUB = 0x0
    XSUBANY = 0
    GVGV::GV = 0x1edf27a0       "main" :: "MODULES_ORG_PERSONAL_SETTIN
+GS_userManager_emergencyContacts"
    FILE = "/home/website/API/APIScripts/Admin.pl"
    DEPTH = 0
    FLAGS = 0x0
    OUTSIDE_SEQ = 40228
    PADLIST = 0x1ee8fb90
    PADNAME = 0x1ee7c6a0(0x0) PAD = 0x1ee7c6b0(0x1f042fc0)
    OUTSIDE = 0x0 (null)
[download]

This function is not in Admin.pl

Comment on Re^2: Getting perl file path from Function Download Code

Replies are listed 'Best First'.
Re^3: Getting perl file path from Function by clintonm9 (Sexton) on Oct 04, 2010 at 19:51 UTC
You are correct. This does work! I was using the wrong Namespace. Now the only issues is it prints using warn or something. Can i retrun the data with Dump?	[reply]
Re^4: Getting perl file path from Function by Anonymous Monk on Oct 04, 2010 at 21:32 UTC
No, not without a SMOP modification of http://cpansearch.perl.org/src/ILYAZ/Devel-Peek-0.96/Peek.xs `... case SVt_PVHV: PerlIO_printf(PerlIO_stderr(),"PVHV%s\n", tmpbuf); break; ...` [download]	[reply] [d/l]