while ( my ( $market ) = $market_sth->fetchrow_array ) { ... }