my %homes_by_names;
foreach my $row ( @data ) {

   $row{'HOME_COUNT'} = $homes_by_name{ $row{ HOME } };

 }