SPUG: Win32, use Cwd, and $ENV{PWD}
Stuart Poulin
stuart_poulin at yahoo.com
Tue Aug 31 13:56:23 CDT 1999
This is a shame. On Unix I use to use Cwd; and $ENV{PWD} to track the current
directory. Doesn't seem to work on NT or Windows 98.
#!perl
# Windows 98 and NT
use Cwd qw(chdir cwd);
chdir('.');
chdir('D:\Perl');
print "PWD=$ENV{PWD}\n";
print "cwd='",cwd,"'\n\n";
chdir('D:\Perl');
print "PWD=$ENV{PWD}\n";
print "cwd='",cwd,"'\n\n";
__END__
PWD=D:/users/spoulin/tmp/D:\Perl
cwd='D:/Perl'
PWD=D:/Perl/D:\Perl
cwd='D:/Perl'
__________________________________________________
Do You Yahoo!?
Bid and sell for free at http://auctions.yahoo.com
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
POST TO: spug-list at pm.org PROBLEMS: owner-spug-list at pm.org
Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
Email to majordomo at pm.org: ACTION spug-list your_address
More information about the spug-list
mailing list