Select Code to Download

push @array, [$first, $last, $address, $city, $zip];

while(<DATA>) {
  push @array, [$first, $last, $address, $city, $zip];
...
foreach (@array){
  print "@$_\n";
}

push @array, $first, $last, $address, $city, $zip;