Select Code to Download

while (my $hash_ref = $SQLBuy->fetchrow_hashref) {
    push @BuySellHashref, \$hash_ref;
}

for my $hashref (@BuySellHashref) {
  print $hashref->{personID} . "\n";
}