[
 [
  "John Doe",
  "Main Street",
  "House 1",
 ],
 [
  "John Doe",
  "Main Street",
  "House 1",
 ],
 ...
]

##</code><code>##

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

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

 }