foreach $team (keys %teams) {

If ($team ne ?please specify?){

Push @list1,$team1;

}

}