Select Code to Download

while (my $row = $sth->fetchrow_hashref) {
 push(@profiles,$row);
}

foreach (@profiles) {
 print "$_->{user_id}\n";
}

@keys = keys %row;
for (@keys){

foreach (keys %row) {