($server) = $unc =~ /^\\([^\\]+)/;