A little bit more : (dan pointed at my error
in "\tmp") so now :
$ perl -e "$dir = ""\\tmp""; if( -w $dir){ print ""Hello"";}"
Fatal VMS error (status=100052) at PERL_ROOT:[000000]VMS.C;1, line 3700 at -e line 1.
%RMS-F-SYN, file specification syntax error
$
$ define tmp SYS_USER4:[JLAURET.SCRATCH]
$ perl -e "$dir = ""\\tmp""; if( -w $dir){ print ""Hello"";}"
Fatal VMS error (status=100052) at PERL_ROOT:[000000]VMS.C;1, line 3700 at -e line 1.
%RMS-F-SYN, file specification syntax error
$
$ define tmp " "
$ perl -e "$dir = ""\\tmp""; if( -w $dir){ print ""Hello"";}"
$
$ deassign tmp
$ perl -e "$dir = ""\\tmp""; if( -w $dir){ print ""Hello"";}"
$
So if the logical tmp is defined, the code crashes if
\tmp is specified. No crashes would occur with /tmp though.
BTW : note that with \tmp, the -w test fails on both 6.2
and 7.2. The following gives
$ perl -e "$dir = ""/tmp""; if( -w $dir){ print ""Hello"";}"
Hello
$
for both tmp defined and undefined. This is correct
indeed.
Thans again to all,
,,,,,
( o o )
--m---U---m--
Jerome
