while(<DATA>){
 ($city,$num)=split;
 push( @{$myhash{$city}}, $num );
}