Re^2: Track the filename/line number of an anonymous coderef

in reply to Re: Track the filename/line number of an anonymous coderef
in thread Track the filename/line number of an anonymous coderef

A warning to anybody who finds this from google.

This approach worked perfectly in perl 5.8.8 and perl 5.20.2, but as of perl 5.30.3, this no longer works.
At that version, "$gv->LINE" outputs some huge number instead of a LINE number.

Somehow using "x $sub" in the debugger still gets the correct answer, so I think there must be some solution.

Comment on Re^2: Track the filename/line number of an anonymous coderef Select or Download Code

Replies are listed 'Best First'.
Re^3: Track the filename/line number of an anonymous coderef by hv (Prior) on May 12, 2022 at 17:56 UTC
This approach worked perfectly in perl 5.8.8 and perl 5.20.2, but as of perl 5.30.3, this no longer works. At that version, "$gv->LINE" outputs some huge number instead of a LINE number. I can't reproduce the problem you report: it works fine for me at 5.30.0, 5.32.0 and 5.34.0 (which I happen to have installed), and I just built 5.30.3 and it works fine for me on that too. Could you provide `perl -V` output? Perhaps there's something specific to your build.	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: Track the filename/line number of an anonymous coderef
by hv (Prior) on May 12, 2022 at 17:56 UTC

This approach worked perfectly in perl 5.8.8 and perl 5.20.2, but as of perl 5.30.3, this no longer works. At that version, "$gv->LINE" outputs some huge number instead of a LINE number.

I can't reproduce the problem you report: it works fine for me at 5.30.0, 5.32.0 and 5.34.0 (which I happen to have installed), and I just built 5.30.3 and it works fine for me on that too.

Could you provide perl -V output? Perhaps there's something specific to your build.

[reply]
[d/l]

In Section Cool Uses for Perl