diff options
author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-09-07 03:16:00 +0000 |
---|---|---|
committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-09-07 03:16:00 +0000 |
commit | 740ce14cd863bb8986a54f425a6f1ec20b26c6cc (patch) | |
tree | e25f5b48ba535ed07ec57bf13ed1c50973dbacd1 /vms/perlvms.pod | |
parent | c43cd16b2d0254cdf3b775a546b5a6986ff4b90a (diff) | |
download | perl-740ce14cd863bb8986a54f425a6f1ec20b26c6cc.tar.gz |
VMS 5.003_05 Update.
Diffstat (limited to 'vms/perlvms.pod')
-rw-r--r-- | vms/perlvms.pod | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/vms/perlvms.pod b/vms/perlvms.pod index b7804f0b42..7d441cb4e2 100644 --- a/vms/perlvms.pod +++ b/vms/perlvms.pod @@ -611,7 +611,7 @@ list logical names. For instance, if you say $ Define STORY once,upon,a,time,there,was $ perl -e "for ($i = 0; $i <= 6; $i++) " - - _$ -e "{ print $ENV{'foo'.$i},' '}" + _$ -e "{ print $ENV{'story;'.$i},' '}" Perl will print C<ONCE UPON A TIME THERE WAS>. @@ -633,6 +633,14 @@ logical name or a name in another logical name table will replace the logical name just deleted. It is not possible at present to define a search list logical name via %ENV. +At present, the first time you iterate over %ENV using +C<keys>, C<values>, or C<each>, you will incur a time +penalty as all logical names are read, in order to fully +populate %ENV. Subsequent iterations will not reread +logical names, so they won't be as slow, but they also +won't reflect any changes to logical name tables caused +by other programs. + In all operations on %ENV, the key string is treated as if it were entirely uppercase, regardless of the case actually specified in the Perl expression. |