while (@results = $sth->fetchrow_array()) {.....}