my %chicago   = map { $_ => undef } qw( tiger bob munch toy  );
my %wisconsin = map { $_ => undef } qw( tiger sara munch toy );
my %rockford  = map { $_ => undef } qw( tiger sara love toy  );