http://perl.active-venture.com/lib/Cwd.html

use Cwd;
my $dir = getcwd;
print $dir,"\n";
創作者介紹

創造心理的感動

gisanfu 發表在 痞客邦 PIXNET 留言(0) 人氣()