$sth->execute() or die $sth->errstr;

my @result_arrays;
while (my @result = $sth->fetchrow_array()) { 
  push(@result_arrays, \@results);        
}

foreach(@results_arrays){  
  print qq(@{$_}<br><br>);
} 
$sth->finish();