my arr_ref= $sth->fetchall_arrayref(); foreach my $row(@$arr_ref) { #missing something here my ($ele1,$ele2,$ele3)= @$row; print "$ele1\t", print "$ele2\t", print "$ele3\n", }