foreach my $row ( @data) {

   $row = $homes_by_names{$row->[1]};

 }