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