Lines Matching refs:path
83 my ($path, $input_format, $format) = @_;
85 return $path if ( ! defined $path );
88 $path =~ s|/*\s*$||;
90 $path =~ s|\\*\s*$||;
96 $path =~ s|\\|/|g;
97 $path =~ s|([a-zA-Z]):/|/cygdrive/$1/|g;
100 $path =~ s|/cygdrive/([a-zA-Z])/|/$1/|g;
101 $path =~ s|/|\\|g;
104 return $path;
109 my ($path, $unix) = @_;
111 $path = cygpath ($path, $unix, $output_format);
113 print $path;