## first put all my favorite teams in a list:
my @favorites = map { Sports::Baseball::Teams->new($_) } qw(Sea Tex Ana); 
## now, let's notice a particular team playing tonight
my $tonight = Sports::Baseball::Teams->new("Sea"); # seattle tonight
## let's see if this team playing tonight is one of my favorites:
if (grep $_ == $tonight, @favorites) {
  ## THIS WON'T BE TRUE, BUT IT SHOULD BE
}