Branch: refs/heads/blead
Home: https://github.com/Perl/perl5
Commit: bba473981f23a3840994a0577c4224d2002a3c7f
https://github.com/Perl/perl5/commit/bba473981f23a3840994a0577c4224d2002a3c7f
Author: Craig A. Berry <[email protected]>
Date: 2022-12-17 (Sat, 17 Dec 2022)
Changed paths:
M t/op/taint.t
Log Message:
-----------
Use VMS absolute path to test tainting
The '"-T" $arg and some suspect arguments' test has been failing
because it assumed setting $ENV{PATH} to /usr/bin will pass the
absolute path check in mg.c's Perl_magic_setenv, but it doesn't.
Using a VMS absolute path gets it passing. Ideally we would be using
PL_perllib_sep to figure out whether the list of library paths is in
Unix syntax or VMS syntax, but that's not accessible from Perl, so
we'll have to assume the test is running with native paths in effect.