@allcompanies = grep {!/^$co$/} @allcompanies;