while ( my @first = $sth->fetchrow_array ) {
    foreach my $field (@first) {