Help for this page

Select Code to Download


  1. or download this
    %fields = ('1.Name' => $cgi->param('name') || 'Anonymous',
              '2.Email' => $cgi->param('email') || 'No email Supplied',
              '3.Comments' => $cgi->param('comments') || 'No Comments',
              '4.Satisfied' => $cgi->param('radio1') || 'Not Specified',
             );
    
  2. or download this
    foreach (sort keys %names) { 
        print "$_ : $names{$_} \n";
    }