$drive = Map "$sh",{user=>"$us",pass=>"$pa",domain=>"$do"};

##</code><code>##

$sh = '\\\\machine1\\d\$'
$us = 'username'
$pa = 'password'
$do = 'domain'

##</code><code>##

"The specified device name is invalid."