On Sat, Jan 7, 2012 at 11:42 PM (a long while ago), Rocky Bernstein > - - - > > I was looking at perl5db code and noticed that numeric value of @dbline is > its COP reference. (In trepan.pl "info program" now shows this when it is > available). I thought this would be a win for being able to more precisely > indicate where you are and to set breakpoints within lines which have > multiple statements on them. > > Such an example line might be: > > if ($x) { $y--; if ($y) { $z += 1 } else { $z -= 1 }; } else { $z = 10 }; > > If you disassemble via B::Concise, you'll see several COPs for this line. > However the @dbline entry for that line always seems to be the first COP > rather than the one that called DB::DB. >
What I've been looking for is Devel::Callsite