if ($site =~ /^([lcnh]|wf)$/) { # one block handles all cases
    $site = "l" unless ( $site =~ /(h|wf)/ );
    $server = "yos.$site.com";
    # and so on
}