diff options
| -rw-r--r-- | pod/perlfunc.pod | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 8107310dc9..1004837802 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -623,15 +623,19 @@ returns the caller's package name if there is a caller, that is, if we're in a subroutine or C<eval> or C<require>, and the undefined value otherwise. In list context, returns + # 0 1 2 ($package, $filename, $line) = caller; With EXPR, it returns some extra information that the debugger uses to print a stack trace. The value of EXPR indicates how many call frames to go back before the current one. + # 0 1 2 3 4 ($package, $filename, $line, $subroutine, $hasargs, + + # 5 6 7 8 9 10 $wantarray, $evaltext, $is_require, $hints, $bitmask, $hinthash) - = caller($i); + = caller($i); Here $subroutine may be C<(eval)> if the frame is not a subroutine call, but an C<eval>. In such a case additional elements $evaltext and |