Michael G Schwern <[EMAIL PROTECTED]> wrote on 07/11/2005 02:46:14 AM:
> vms/ext/Filespec.pm is out of date and broken.
Indeed. It appears that filespec.t is not run on Solaris for example
(IIRC that test used to be run on Unix automatically).
Here are the shell commands I just had to run to conduct
the test on SunOS 5.8:
sh Configure -des
make
make test
mkdir lib/VMS
cp vms/ext/Filespec.pm lib/VMS
cd t
../perl -I../lib ../vms/ext/filespec.t
In the resultant output only tests 1 through 136 actually ran (missing
tests
137 through 142). There were so many failures that it might be better
so list only those that passed:
ok 68 - fileify('__down_:[__the_.__garden_]__path_.'): ''
ok 70 - fileify('__down_:[__the_]__garden_.__path_'): ''
ok 72 - fileify('/__down_/__the_/__garden_/__path_.'): ''
ok 74 - fileify('/__down_/__the_/__garden_.__path_'): ''
ok 86 - pathify('__down_:[__the_.__garden_]__path_.'): ''
ok 88 - pathify('__down_:[__the_]__garden_.__path_'): ''
ok 90 - pathify('/__down_/__the_/__garden_/__path_.'): ''
ok 92 - pathify('/__down_/__the_/__garden_.__path_'): ''
ok 94 - pathify('__down_:[__the_.__garden_]__path_.dir;2'): ''
ok 104 - pathify('__path_.notdir'): ''
ok 133 - eval File::Spec->canonpath('__dev:[__dir.000000]__foo')
ok 134 - File::Spec->canonpath('__dev:[__dir.000000]__foo'):
'__dev:[__dir.000000]__foo'
ok 135 - eval File::Spec->canonpath('__dev:[__dir.][000000]__foo')
Peter Prymmer
