From: Iain Spoon Truskett <perl@dellah.anu.edu.au>
Date: Fri, 14 Feb 2003 10:12:00 +0000 (+1100)
Subject: Re: perlvar phrasing clarification for $^S
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fa05a9fd14fa1e936b4708399d5cb3873024a775;p=p5sagit%2Fp5-mst-13.2.git

Re: perlvar phrasing clarification for $^S
From: "Iain 'Spoon' Truskett" <perl@dellah.anu.edu.au>
Message-ID: <20030213231200.GE16300@ouroboros.anu.edu.au>

p4raw-id: //depot/perl@18706
---

diff --git a/pod/perlvar.pod b/pod/perlvar.pod
index 7621be0..7af33eb 100644
--- a/pod/perlvar.pod
+++ b/pod/perlvar.pod
@@ -1091,9 +1091,15 @@ regular expression assertion (see L<perlre>).  May be written to.
 
 =item $^S
 
-Current state of the interpreter.  Undefined if parsing of the current
-module/eval is not finished (may happen in $SIG{__DIE__} and
-$SIG{__WARN__} handlers).  True if inside an eval(), otherwise false.
+Current state of the interpreter.
+
+    $^S         State
+    ---------   -------------------
+    undef       Parsing module/eval
+    true (1)    Executing an eval
+    false (0)   Otherwise
+
+The first state may happen in $SIG{__DIE__} and $SIG{__WARN__} handlers.
 
 =item $BASETIME