my @permitted=qw(name price description);
my %fields;
@fields{@permitted}=undef;