Select Code to Download

foreach $row (@rows} {
  my %hrec = (
  # etc...
}

foreach $row (@rows} {
  $hrec = { # Note: different bracket
...
  }
  $num = push @products, $hrec;
}