Mega Code Archive

 

Categories / Perl / Win32

 

Current directory

#!/usr/bin/perl -w use Win32; $cwd    = Win32::GetCwd(); print "Current directory=$cwd\n";