Charles K. Clarkson <mailto:[EMAIL PROTECTED]> wrote:
: BEGIN {
: printf qq~
: In LIST context:
: Package: %s
: File: %s
: Line number: %s
:
: ~, caller();
:
: printf qq~
: In SCALAR context:
: Package: %s
:
: ~, scalar caller();
: }
Oops! That shouldn't be in a BEGIN block. It messes up
the line number value. Returning the next line after the
block in this file instead of the caller's line number.
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
