Help for this page

Select Code to Download


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