$list = "net use \\\\$Machine $password /USER:$domain\\$user";
system ("$list");