<div dir="ltr"><div>On 6 June 2010 16:18, Gaal Yahas <span dir="ltr">&lt;<a href="mailto:gaal@forum2.org">gaal@forum2.org</a>&gt;</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 &quot;caller&quot;:<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&#39;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>