Re^3: Code asks, in what file do I live?

Er, actually it returns stuff about the caller of the current subroutine

Well, if you pass in 0 (caller(0)) then you get the caller information for the current stack frame plus some more information.

my $filename = (caller(0))[1];
[download]

Comment on Re^3: Code asks, in what file do I live? Download Code

Replies are listed 'Best First'.
Re^4: Code asks, in what file do I live? by dave_the_m (Monsignor) on Sep 23, 2004 at 20:46 UTC
Well, if you pass in 0 (caller(0)) then you get the caller information for the current stack frame And the current stack frame still shows who called you, not who you are. You can't determine the current filename using caller: `$ cat /tmp/x sub f { my $f = (caller(0))[1]; print "I am: ", __FILE__, "\n"; print "caller: $f\n"; } 1; $ perl585 -e 'require "/tmp/x"; f()' I am: /tmp/x caller: -e $` [download] Dave.	[reply] [d/l]
A reply falls below the community's threshold of quality. You may see it by logging in.