my $ip = 'shift';
my $share = '\\\\' . $ip . '\\c$';
Map G => $share, { persistent => 1 };