diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-03-11 08:03:38 +0000 |
|---|---|---|
| committer | Charles Bailey <bailey@genetics.upenn.edu> | 1996-03-11 08:03:38 +0000 |
| commit | d57fa8b6af39ea3eaa99a66e02134fdf61adb746 (patch) | |
| tree | a1b384e8a649b1b9d9744df1cf041bec1822ab12 /lib/English.pm | |
| parent | f97f1ee016dcf94fbe828d5c23deb04ba8aa0dc9 (diff) | |
| download | perl-d57fa8b6af39ea3eaa99a66e02134fdf61adb746.tar.gz | |
Add $^E and $^O
Diffstat (limited to 'lib/English.pm')
| -rw-r--r-- | lib/English.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/English.pm b/lib/English.pm index d82ba2cf52..ce4520a891 100644 --- a/lib/English.pm +++ b/lib/English.pm @@ -67,6 +67,7 @@ sub import { *CHILD_ERROR *OS_ERROR *ERRNO + *EXTENDED_OS_ERROR *EVAL_ERROR *PROCESS_ID *PID @@ -88,6 +89,7 @@ sub import { *BASETIME *WARNING *EXECUTABLE_NAME + *OSNAME ); # The ground of all being. @@ -136,6 +138,7 @@ sub import { *CHILD_ERROR = *? ; *OS_ERROR = *! ; + *EXTENDED_OS_ERROR = *^E ; *ERRNO = *! ; *EVAL_ERROR = *@ ; @@ -164,6 +167,7 @@ sub import { *BASETIME = *^T ; *WARNING = *^W ; *EXECUTABLE_NAME = *^X ; + *OSNAME = *^O ; # Deprecated. |