lib/File/Spec/Cygwin.pm

   1 package File::Spec::Cygwin;
   2
   3 use strict;
   4 use vars qw(@ISA $VERSION);
   5 require File::Spec::Unix;
   6
   7 $VERSION = '1.0';
   8
   9 @ISA = qw(File::Spec::Unix);
  10
  11 sub canonpath {
  12     my($self,$path) = @_;
  13     $path =~ s|\\|/|g;
  14     return $self->SUPER::canonpath($path);
  15 }
  16
  17 1;
  18 __END__
  19
  20 =head1 NAME
  21
  22 File::Spec::Cygwin - methods for Cygwin file specs
  23
  24 =head1 SYNOPSIS
  25
  26  require File::Spec::Cygwin; # Done internally by File::Spec if needed
  27
  28 =head1 DESCRIPTION
  29
  30 See File::Spec::Unix for a documentation of the methods provided
  31 there. This package overrides the implementation of these methods, not
  32 the semantics.
  33
  34 This module is still in beta.  Cygwin-knowledgeable folks are invited
  35 to offer patches and suggestions.