my $drive = Map '\\\\server\\share';
chdir("$drive\\some\\directory");