my $b = "\\";
$sh = "$b${b}machine1${b}d\$";