John E. Malmberg wrote:
> The dump of [EMAIL PROTECTED] on VMS produces the following output that
> is different from the expected.
>
> In particular, there is no trailing null on the value on the resulting
> value, and it has the additional flags of "READONLY" and "FAKE".
>
> What I do not know is if this is an intended behavior on VMS as a side
> effect of creating or modifying $ENV{PATH}.
As far as I can tell from a quick glance, the \0 absence is a bug, but
harmless since perl doesn't use a trailing \0 to mark end of strings
internally ; and the FAKE/READONLY flags are ok, due to the way %ENV is
handled on VMS.
> got:
> [
> <snip>
> SV = PVMG(0x2b5770) at 0x28c6d8
> FLAGS = (TEMP,POK,FAKE,READONLY,pPOK)
> PV = 0x2c4e84 "PATH"
> <snip>
> ]
> expected:
> [
> (?:ALLOCATED at .*?
> )?SV = PVMG\(0x[[:xdigit:]]+\) at 0x[[:xdigit:]]+
> <snip>
> FLAGS = \(TEMP,POK,pPOK\)
> (?: IV = 0
> )? PV = 0x[[:xdigit:]]+ "(?i:PATH)"\\0
> <snip>
> ]
> not ok 21
