On Mon, Aug 22, 2005 at 10:35:54PM -0400, John E. Malmberg wrote: > On every blead perl I have seen, the following bug is present on VMS and > is causing the script t/op/magic.t to fail at test 7. > > In the Perl debugger, before running any script if you issue the command > 'x keys(%ENV), the entry for index 0, also shows up as index 1. > > DB<1> x keys(%ENV) > 0 'SYS$TIMEZONE_DAYLIGHT_SAVING' > 1 'SYS$TIMEZONE_DAYLIGHT_SAVING' > 2 'CDE$DETACHED_LOGICALS' > 3 'MOP$NAMED_LOAD' > 4 'BUILD_ROOT' > > On all subsequent calls, you get the expected results: > > DB<2> x keys(%ENV) > 0 'SYS$TIMEZONE_DAYLIGHT_SAVING' > 1 'CDE$DETACHED_LOGICALS' > 2 'MOP$NAMED_LOAD' > 3 'BUILD_ROOT' > 4 'SMBSRVSHR_TV'
IIRC %ENV on VMS is special, in that it's the only platform and only hash that uses the DYNAMIC_ENV_FETCH code. It's quite possible that there's a strange, unnoticed bug in that. Nicholas Clark