You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
8 lines
107 B
Perl
8 lines
107 B
Perl
5 years ago
|
|
||
|
#! /usr/local/bin/perl
|
||
|
use Cwd;
|
||
|
$dir = cwd;
|
||
|
print "dir=> $dir\n";
|
||
|
chdir ('D:\\mydir');
|
||
|
$dir = cwd;
|