On Wednesday, June 11, 2003, at 03:09PM, <[EMAIL PROTECTED]> wrote:
>I have been complaining that File::Find is now broken >on VMS as of late. I don't think it's a new problem; I think we just didn't run into it very often until recently. >$ define fb USER:[PVHP.58X.PERL] >$ perl lib/File/Find/t/find.t >1..79 >ok 1 >ok 2 >ok 3 >ok 4 >ok 5 >not ok 6 > file exists > >Can anyone else reproduce this problem? That is define "fb" to >be an existing directory then try to run "perl lib/File/Find/t/find.t" >Thanks for any confirmations. Yes, same thing happens here. I think whenever File::Find does C<chdir $foo;> we need to make it do C<chdir "./$foo";> or, more portably, C<chdir File::Spec->catdir(File::Spec->curdir, $foo);>. Every time I start to do this I get confused because there are some paths that may be expected to be absolute when passed to chdir, but there aren't exactly a lot of comments in the File::Find code to help me figure out what's going on.
