On Jan 26, 2006, at 11:45 AM, Craig A. Berry wrote:
The pathname is ok. The test can't find it because it really doesn't
exist because it got deleted by DistGen->clean(), which doesn't
recognize it as one of the directories in its cache of directory
names. The basic issues revolve around VMS filespec idiosyncracies.
For example, we'll have to call splitpath before splitdir if we want
the device name to be separated from the first directory name:
$ perl -e "use File::Spec; print join('|',
File::Spec->splitdir('DEV:[foo.bar]'));"
DEV:[foo|bar
$ perl -e "use File::Spec; print join('|',
File::Spec->splitpath('DEV:[foo.bar]'));"
DEV:|[foo.bar]|
Yup, thanks for spotting that. Other platforms with volume names can
presumably be affected by this too.
On VMS, searching the path is the least common mechanism for locating
the program that will execute a command. I think instead of
find_in_path() we'll have to abstract this into a make_is_installed()
or something that can do different things when necessary.
That would be great.
-Ken
