Re: Converting Unix paths to windows

[Michael Fowler]

On Wed, Jun 27, 2001 at 12:08:26PM -0700, Chuck Ivy wrote:
>       if    ($0=~m#^(.*)\\#){ $cgidir = "$1"; }  # win/dos
>       elsif ($0=~m#^(.*)/# ){ $cgidir = "$1"; }  # Unix
>       else  {`pwd` =~ /(.*)/; $cgidir = "$1"; }  # Unix

This is just a less portable implementation of what FindBin.pm does, which
comes standard with Perl.


Michael
--
Administrator                      www.shoebox.net
Programmer, System Administrator   www.gallanttech.com
--