foreach my $field (@fields)