Select Code to Download

my %homes_by_names=();
my @data=();
...
  $row->{'HOME_COUNT'} = $homes_by_names{ $row->{ NAME } };
}
print Dumper \@data;