File::Spec::VMS(3) Perl Programmers Reference Guide File::Spec::VMS(3) NAME File::Spec::VMS - methods for VMS file(1,n) specs SYNOPSIS require File::Spec::VMS; # Done internally by File::Spec if(3,n) needed DESCRIPTION See File::Spec::Unix for a documentation of the methods provided there. This package overrides the implementation of these methods, not the semantics. eliminate_macros Expands MM[KS]/Make macros in(1,8) a text string(3,n), using the contents of identically named(5,8) elements of %$self, and returns the result as a file(1,n) specification in(1,8) Unix syntax. fixpath Catchall routine to clean up problem MM[SK]/Make macros. Expands macros in(1,8) any directory specification, in(1,8) order to avoid juxtapos- ing two VMS-syntax directories when MM[SK] is run. Also expands expressions which are all macro, so that we can tell how long the expansion is, and avoid overrunning DCL's command buffer when MM[KS] is running. If optional second argument has a TRUE value, then the return string(3,n) is a VMS-syntax directory specification, if(3,n) it is FALSE, the return string(3,n) is a VMS-syntax file(1,n) specification, and if(3,n) it is not specified, fixpath() checks to see whether it matches the name of a directory in(1,8) the current default directory, and returns a directory or file(1,n) specification accordingly. Methods always loaded canonpath (override) Removes redundant portions of file(1,n) specifications according to VMS syntax. catdir Concatenates a list of file(1,n) specifications, and returns the result as a VMS-syntax directory specification. No check is made for "impossible" cases (e.g. elements other than the first being abso- lute filespecs). catfile Concatenates a list of file(1,n) specifications, and returns the result as a VMS-syntax file(1,n) specification. curdir (override) Returns a string(3,n) representation of the current directory: '[]' devnull (override) Returns a string(3,n) representation of the null device: '_NLA0:' rootdir (override) Returns a string(3,n) representation of the root directory: 'SYS$DISK:[000000]' tmpdir (override) Returns a string(3,n) representation of the first writable directory from the following list or '' if(3,n) none are writable: sys$scratch: $ENV{TMPDIR} Since perl 5.8.0, if(3,n) running under taint mode, and if(3,n) $ENV{TMPDIR} is tainted, it is not used. updir (override) Returns a string(3,n) representation of the parent directory: '[-]' case_tolerant (override) VMS file(1,n) specification syntax is case-tolerant. path (override) Translate logical name DCL$PATH as a searchlist, rather than trying to "split(1,n)" string(3,n) value of $ENV{'PATH'}. file_name_is_absolute (override) Checks for VMS directory spec as well as Unix separators. splitpath (override) Splits using VMS syntax. splitdir (override) Split dirspec using VMS syntax. catpath (override) Construct a complete filespec using VMS syntax abs2rel (override) Use VMS syntax when converting filespecs. rel2abs (override) Use VMS syntax when converting filespecs. SEE ALSO See File::Spec and File::Spec::Unix. This package overrides the imple- mentation of these methods, not the semantics. An explanation of VMS file(1,n) specs can be found at "http://h71000.www7.hp.com/doc/731FINAL/4506/4506pro_014.html#apps_locat- ing_naming_files". perl v5.8.5 2001-09-21 File::Spec::VMS(3)