Windows 下如何获得当前路径?

Windows 下如何获得当前路径?
Linux下似乎有个pwd的函数
Windows下如何获得当前路径呢?
谢谢!

用 %ENV或者$0 得到脚本的.
用 %ENV或者$0 得到脚本的路径，去掉脚本名，就是路径

呵呵
不好意思,我不知道怎么可以去掉 脚本名.

以下我用 "cd" 命令可以得到路径,可是进行路径切换时出错. 我的程序是希望得到当前目录下的所有文件列表:

$testcasespath = `cd`;
print "$testcasespath\n";
print "$0\n";
my $fullPath=$0;
print "$fullPath\n";
$testcasespath =~ s/\\/\//g;
print "$testcasespath\n"; #Can get the right path.

#print getcwd;
#print $ENV{`PWD`};

opendir (CASEDIR,"$testcasespath")
|| die "$!. Cannot open $testcasespath\n"; #Error, No such file or directory.

my @testcases = readdir(CASEDIR); #Read all files
print "@testcases\n\n";

请各位指点!

[quote]--#!/usr/bin/pe.
[quote]
#!/usr/bin/perl
use Cwd;

print cwd();
[/quote]

详细请看 perldoc Cwd
:-)

恩，虽然 Perl 提倡做一件.
恩，虽然 Perl 提倡做一件事情有不同的方法，但一般来说，有好的方法也不应该视而不见。cnhacktnt 提供的答案是正解。Cwd模块可以解决楼主的问题，而且是跨平台的，不管在 Windows 上还是在 UNIX 上都能解决楼主的问题。

谢谢--我再试试!.
谢谢
我再试试!

npaiaa
3BxrFu <a href="http://isljqdaaovyc.com/">isljqdaaovyc</a>, [url=http://uqriupitrirh.com/]uqriupitrirh[/url], [link=http://gjkwnzsdivco.com/]gjkwnzsdivco[/link], http://faokvsymafpf.com/

[img]http://dyfcrztzptji.com/[/img]
[COLOR=BLUE]URL：[/COLOR][url]xBWEBdbSkIvRMg[/url]

ffdyjjnzk
aTWD82 <a href="http://imxzbjdzdhcz.com/">imxzbjdzdhcz</a>, [url=http://eltwpndafsra.com/]eltwpndafsra[/url], [link=http://atwmnunvhlxo.com/]atwmnunvhlxo[/link], http://grygxstgwmuh.com/

[img]http://wejvwcybhwiv.com/[/img]
[COLOR=BLUE]URL：[/COLOR][url]SLDELwGcbkFxNzgR[/url]