my $dir = "//10.10.10.10/test/tmp"; opendir(DIR, $dir) || die "$dir: $!"; chdir("//10.10.10.10/test/tmp");