while (my $market = $market_sth->fetchrow_arrayref) { print "" ; }