my $rows = $dbh->selectall_arrayref("SELECT rowa,rowb FROM jgeier.test"); foreach my $row (@$rows) { print "ROWA:".$$row[0]."\n"; print "ROWB:".$$row[1]."\n"; print "--- --- --- --- ---\n"; }