diff options
| author | Peter Prymmer <PPrymmer@factset.com> | 2001-04-25 11:43:27 -0700 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-26 00:46:58 +0000 |
| commit | a3bd614aa48e2464403cdfaaa928ab0186d45539 (patch) | |
| tree | e2b3ae900e78e0cd1a19ad72f3653977193049db /vms/ext | |
| parent | d8981068a9defe9924b4ab33562fcfa3ec908163 (diff) | |
| download | perl-a3bd614aa48e2464403cdfaaa928ab0186d45539.tar.gz | |
VMS updates
Message-ID: <Pine.OSF.4.10.10104251842130.257877-100000@aspara.forte.com>
p4raw-id: //depot/perl@9847
Diffstat (limited to 'vms/ext')
| -rw-r--r-- | vms/ext/filespec.t | 98 |
1 files changed, 49 insertions, 49 deletions
diff --git a/vms/ext/filespec.t b/vms/ext/filespec.t index 779396be73..452c72e32a 100644 --- a/vms/ext/filespec.t +++ b/vms/ext/filespec.t @@ -68,29 +68,29 @@ print +(rmdir('testdir/') ? 'ok ' : 'not ok '),++$idx,"\n"; __DATA__ # Basic VMS to Unix filespecs -some:[where.over]the.rainbow unixify /some/where/over/the.rainbow -[.some.where.over]the.rainbow unixify some/where/over/the.rainbow -[-.some.where.over]the.rainbow unixify ../some/where/over/the.rainbow -[.some.--.where.over]the.rainbow unixify some/../../where/over/the.rainbow -[.some...where.over]the.rainbow unixify some/.../where/over/the.rainbow -[...some.where.over]the.rainbow unixify .../some/where/over/the.rainbow -[.some.where.over...]the.rainbow unixify some/where/over/.../the.rainbow -[.some.where.over...] unixify some/where/over/.../ -[.some.where.over.-] unixify some/where/over/../ +some_logical_name_not_likely:[where.over]the.rainbow unixify /some_logical_name_not_likely/where/over/the.rainbow +[.some_logical_name_not_likely.where.over]the.rainbow unixify some_logical_name_not_likely/where/over/the.rainbow +[-.some_logical_name_not_likely.where.over]the.rainbow unixify ../some_logical_name_not_likely/where/over/the.rainbow +[.some_logical_name_not_likely.--.where.over]the.rainbow unixify some_logical_name_not_likely/../../where/over/the.rainbow +[.some_logical_name_not_likely...where.over]the.rainbow unixify some_logical_name_not_likely/.../where/over/the.rainbow +[...some_logical_name_not_likely.where.over]the.rainbow unixify .../some_logical_name_not_likely/where/over/the.rainbow +[.some_logical_name_not_likely.where.over...]the.rainbow unixify some_logical_name_not_likely/where/over/.../the.rainbow +[.some_logical_name_not_likely.where.over...] unixify some_logical_name_not_likely/where/over/.../ +[.some_logical_name_not_likely.where.over.-] unixify some_logical_name_not_likely/where/over/../ [] unixify ./ [-] unixify ../ [--] unixify ../../ [...] unixify .../ # and back again -/some/where/over/the.rainbow vmsify some:[where.over]the.rainbow -some/where/over/the.rainbow vmsify [.some.where.over]the.rainbow -../some/where/over/the.rainbow vmsify [-.some.where.over]the.rainbow -some/../../where/over/the.rainbow vmsify [-.where.over]the.rainbow -.../some/where/over/the.rainbow vmsify [...some.where.over]the.rainbow -some/.../where/over/the.rainbow vmsify [.some...where.over]the.rainbow -/some/.../where/over/the.rainbow vmsify some:[...where.over]the.rainbow -some/where/... vmsify [.some.where...] +/some_logical_name_not_likely/where/over/the.rainbow vmsify some_logical_name_not_likely:[where.over]the.rainbow +some_logical_name_not_likely/where/over/the.rainbow vmsify [.some_logical_name_not_likely.where.over]the.rainbow +../some_logical_name_not_likely/where/over/the.rainbow vmsify [-.some_logical_name_not_likely.where.over]the.rainbow +some_logical_name_not_likely/../../where/over/the.rainbow vmsify [-.where.over]the.rainbow +.../some_logical_name_not_likely/where/over/the.rainbow vmsify [...some_logical_name_not_likely.where.over]the.rainbow +some_logical_name_not_likely/.../where/over/the.rainbow vmsify [.some_logical_name_not_likely...where.over]the.rainbow +/some_logical_name_not_likely/.../where/over/the.rainbow vmsify some_logical_name_not_likely:[...where.over]the.rainbow +some_logical_name_not_likely/where/... vmsify [.some_logical_name_not_likely.where...] /where/... vmsify where:[...] . vmsify [] .. vmsify [-] @@ -99,48 +99,48 @@ some/where/... vmsify [.some.where...] / vmsify sys$disk:[000000] # Fileifying directory specs -down:[the.garden.path] fileify down:[the.garden]path.dir;1 -[.down.the.garden.path] fileify [.down.the.garden]path.dir;1 -/down/the/garden/path fileify /down/the/garden/path.dir;1 -/down/the/garden/path/ fileify /down/the/garden/path.dir;1 -down/the/garden/path fileify down/the/garden/path.dir;1 -down:[the.garden]path fileify down:[the.garden]path.dir;1 -down:[the.garden]path. fileify # N.B. trailing . ==> null type -down:[the]garden.path fileify -/down/the/garden/path. fileify # N.B. trailing . ==> null type -/down/the/garden.path fileify +down_logical_name_not_likely:[the.garden.path] fileify down_logical_name_not_likely:[the.garden]path.dir;1 +[.down_logical_name_not_likely.the.garden.path] fileify [.down_logical_name_not_likely.the.garden]path.dir;1 +/down_logical_name_not_likely/the/garden/path fileify /down_logical_name_not_likely/the/garden/path.dir;1 +/down_logical_name_not_likely/the/garden/path/ fileify /down_logical_name_not_likely/the/garden/path.dir;1 +down_logical_name_not_likely/the/garden/path fileify down_logical_name_not_likely/the/garden/path.dir;1 +down_logical_name_not_likely:[the.garden]path fileify down_logical_name_not_likely:[the.garden]path.dir;1 +down_logical_name_not_likely:[the.garden]path. fileify # N.B. trailing . ==> null type +down_logical_name_not_likely:[the]garden.path fileify +/down_logical_name_not_likely/the/garden/path. fileify # N.B. trailing . ==> null type +/down_logical_name_not_likely/the/garden.path fileify # and pathifying them -down:[the.garden]path.dir;1 pathify down:[the.garden.path] -[.down.the.garden]path.dir pathify [.down.the.garden.path] -/down/the/garden/path.dir pathify /down/the/garden/path/ -down/the/garden/path.dir pathify down/the/garden/path/ -down:[the.garden]path pathify down:[the.garden.path] -down:[the.garden]path. pathify # N.B. trailing . ==> null type -down:[the]garden.path pathify -/down/the/garden/path. pathify # N.B. trailing . ==> null type -/down/the/garden.path pathify -down:[the.garden]path.dir;2 pathify #N.B. ;2 +down_logical_name_not_likely:[the.garden]path.dir;1 pathify down_logical_name_not_likely:[the.garden.path] +[.down_logical_name_not_likely.the.garden]path.dir pathify [.down_logical_name_not_likely.the.garden.path] +/down_logical_name_not_likely/the/garden/path.dir pathify /down_logical_name_not_likely/the/garden/path/ +down_logical_name_not_likely/the/garden/path.dir pathify down_logical_name_not_likely/the/garden/path/ +down_logical_name_not_likely:[the.garden]path pathify down_logical_name_not_likely:[the.garden.path] +down_logical_name_not_likely:[the.garden]path. pathify # N.B. trailing . ==> null type +down_logical_name_not_likely:[the]garden.path pathify +/down_logical_name_not_likely/the/garden/path. pathify # N.B. trailing . ==> null type +/down_logical_name_not_likely/the/garden.path pathify +down_logical_name_not_likely:[the.garden]path.dir;2 pathify #N.B. ;2 path pathify path/ -/down/the/garden/. pathify /down/the/garden/./ -/down/the/garden/.. pathify /down/the/garden/../ -/down/the/garden/... pathify /down/the/garden/.../ +/down_logical_name_not_likely/the/garden/. pathify /down_logical_name_not_likely/the/garden/./ +/down_logical_name_not_likely/the/garden/.. pathify /down_logical_name_not_likely/the/garden/../ +/down_logical_name_not_likely/the/garden/... pathify /down_logical_name_not_likely/the/garden/.../ path.notdir pathify # Both VMS/Unix and file/path conversions -down:[the.garden]path.dir;1 unixpath /down/the/garden/path/ -/down/the/garden/path vmspath down:[the.garden.path] -down:[the.garden.path] unixpath /down/the/garden/path/ -down:[the.garden.path...] unixpath /down/the/garden/path/.../ -/down/the/garden/path.dir vmspath down:[the.garden.path] -[.down.the.garden]path.dir unixpath down/the/garden/path/ -down/the/garden/path vmspath [.down.the.garden.path] +down_logical_name_not_likely:[the.garden]path.dir;1 unixpath /down_logical_name_not_likely/the/garden/path/ +/down_logical_name_not_likely/the/garden/path vmspath down_logical_name_not_likely:[the.garden.path] +down_logical_name_not_likely:[the.garden.path] unixpath /down_logical_name_not_likely/the/garden/path/ +down_logical_name_not_likely:[the.garden.path...] unixpath /down_logical_name_not_likely/the/garden/path/.../ +/down_logical_name_not_likely/the/garden/path.dir vmspath down_logical_name_not_likely:[the.garden.path] +[.down_logical_name_not_likely.the.garden]path.dir unixpath down_logical_name_not_likely/the/garden/path/ +down_logical_name_not_likely/the/garden/path vmspath [.down_logical_name_not_likely.the.garden.path] path vmspath [.path] / vmspath sys$disk:[000000] # Redundant characters in Unix paths -//some/where//over/../the.rainbow vmsify some:[where]the.rainbow -/some/where//over/./the.rainbow vmsify some:[where.over]the.rainbow +//some_logical_name_not_likely/where//over/../the.rainbow vmsify some_logical_name_not_likely:[where]the.rainbow +/some_logical_name_not_likely/where//over/./the.rainbow vmsify some_logical_name_not_likely:[where.over]the.rainbow ..//../ vmspath [--] ./././ vmspath [] ./../. vmsify [-] |