A different approach: You could do something like
print qq{Caller's Name: $caller \n};
But... I don't know how to put in the subroutine/function name directly. Cleverer people than me will know the way though...
Hope this is of use...
Update:
Initially I though this would work but although it does for the variable the function call is untouched.
$foo = "bar";
while(<DATA>) {
print eval("\"".$_."\"");
}
__DATA__
line 1
$foo
&localtime()
line 3