while (@data = $sth->fetchrow_array) {
   bleh blah bleh
}