my %baseball = ( mets => "new york", orioles => "baltimore", twins => "minnesota" ); if ($baseball{yankees} .= $baseball{mets}) { # edited foreach $_ (keys %baseball) { print "$_ => $baseball{$_}\n"; } }