Help for this page
name -- name name -- name
my %field_def = ( name => "name", ... for (my ($key, $val) = each (%field_def)) { print "$key -- $val\n"; }