p4raw-id: //depot/cfgperl@6289
package File::Spec::Mac;
use strict;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
require File::Spec::Unix;
$VERSION = '1.2';
package File::Spec::OS2;
use strict;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
require File::Spec::Unix;
@ISA = qw(File::Spec::Unix);
+$VERSION = 1.0;
+
sub devnull {
return "/dev/nul";
}
package File::Spec::VMS;
use strict;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
require File::Spec::Unix;
@ISA = qw(File::Spec::Unix);
+$VERSION = 1.0;
+
use Cwd;
use File::Basename;
use VMS::Filespec;
use strict;
use Cwd;
-use vars qw(@ISA);
+use vars qw(@ISA $VERSION);
require File::Spec::Unix;
$VERSION = '1.2';