<div dir="ltr"><div>On 6 June 2010 16:18, Gaal Yahas <span dir="ltr"><<a href="mailto:gaal@forum2.org">gaal@forum2.org</a>></span> wrote:</div><blockquote class="gmail_quote" style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0.8ex; border-left-width: 1px; border-left-color: rgb(204, 204, 204); border-left-style: solid; padding-left: 1ex; ">
Note also this from perlfunc for "caller":<br><br> Furthermore, when called from within the DB package,<br>caller returns more detailed<br> information: it sets the list variable @DB::args to be<br>
the arguments with which<br> the subroutine was invoked.</blockquote><div> </div><div>It's not really clear from the docs how to use it, but this does the trick:</div><div><br></div><div> my @args = do { package DB; caller(); our @args };<br>
<br></div><div>This is also available from a few CPAN modules, BTW.</div><div><br></div></div>