my $sql = qq{ SELECT * FROM slname};
    $qry = $dbhutils->prepare($sql);
    $qry->execute();
    my $slnameHTML = "";

    while (@row = $qry->fetchrow_array){
        $slname = $row[0];
        $slID = $row[1];
        $slnameHTML = $slnameHTML . "<option value=\"$slID\">$slname<\/option>\n";	    
    }
    $qry->finish();