while (@data = $sth->fetchrow_array())