ActiveState Perl 軟體: 柏際

軟體代理 ActiveState Perl: 柏際 http://www.bockytech.com.tw/index.htm

## Convert Unix paths into Win paths with perl:
$cwd=`cd`;
$cwd =~ s/^\s*|\s*$//g;
print $cwd,"\n";
$cwd =~ s{\\}{\/}g;
print $cwd;