Peter Prymmer ([EMAIL PROTECTED]) writes:
> Charles Lane wrote:
>>
>> Notice that chdir('/unix/style/spec') works
>> Notice that chdir('/unix/style/spec/') doesn't work
>>
>> We trim trailing '/' in a few places (mkdir) but not chdir...
> That's got it! Thanks. I had been calling from DCL this:
> find(\&wanted, unixify(shift()));
> but unixify turns DISK:[DIR.SUBDIR] into /DISK/DIR/SUBDIR/ with a trailing
> slash. I can remove that slash by hand.
> Hmm this is DEC C version dependent. I'd guess that putting a warning
> into the pod for File::Find wouldn't be appropriate and I am not
> sure about that for VMS::Filespec. Maybe README.vms or VMS::Filespec?
Every time I've run across it I've patched the code to strip the trailing
slash for VMS, stuff like:
...
$dir =~ s#/$## if $^O eq 'VMS';
chdir($dir);
...
maybe instead we should make Perl call a "my_chdir", just like my_mkdir...
then it won't matter whether the user has the trailing slash or not.
--
Drexel University \V --Chuck Lane
----------------->--------*------------<[EMAIL PROTECTED]
(215) 895-1545 / \ Particle Physics [EMAIL PROTECTED]
FAX: (215) 895-5934 /~~~~~~~~~~~ [EMAIL PROTECTED]
