use DBI;
...
...
...
while ( my @rows = $sth->fetchrow_array ) {
    print "@rows\n";
}