Putting the script into a cgi-bin directory
2001-07-12  Dan Mueth  <d-mueth@uchicago.edu>
        Putting the script into a cgi-bin directory
        * cgi-bin/membership-form-handler.cgi:
			
			
This commit is contained in:
		
							parent
							
								
									1b282c45c8
								
							
						
					
					
						commit
						4e376f5e9b
					
				
					 1 changed files with 61 additions and 0 deletions
				
			
		
							
								
								
									
										61
									
								
								cgi-bin/membership-form-handler.cgi
									
										
									
									
									
										Executable file
									
								
							
							
						
						
									
										61
									
								
								cgi-bin/membership-form-handler.cgi
									
										
									
									
									
										Executable file
									
								
							|  | @ -0,0 +1,61 @@ | |||
| #!/usr/bin/perl | ||||
| # | ||||
| # A *really* simple CGI handler for the GNOME Foundation membership | ||||
| # form. | ||||
| # | ||||
| # Author: Russell Steinthal <rms39@columbia.edu> | ||||
| # | ||||
| # | ||||
| 
 | ||||
| my $MAIL_COMMAND = "/usr/lib/sendmail"; | ||||
| 
 | ||||
| use CGI qw /-debug/; | ||||
| 
 | ||||
| my $form = new CGI; | ||||
| $form->import_names ("FORM"); | ||||
| 
 | ||||
| print $form->header; | ||||
| 
 | ||||
| my $date = localtime; | ||||
| 
 | ||||
| open MAIL, "|$MAIL_COMMAND"; | ||||
| print MAIL <<END; | ||||
| From: gnome-membership\@condor.nj.org (GNOME Membership Script) | ||||
| To: membership\@gnome.org (GNOME Membership Committee) | ||||
| Subject: Application received from $FORM::name ($FORM::email) | ||||
| 
 | ||||
| Contact Information: | ||||
| -------------------- | ||||
| Name: $FORM::name | ||||
| E-mail: $FORM::email | ||||
| irc.gnome.org nickname (if any): $FORM::ircnick | ||||
| cvs.gnome.org username (if any): $FORM::cvsuser | ||||
| 
 | ||||
| GNOME contributions: | ||||
| -------------------- | ||||
| 
 | ||||
| Summary: | ||||
| $FORM::summary | ||||
| 
 | ||||
| Detailed description: | ||||
| $FORM::details | ||||
| 
 | ||||
| Contacts: | ||||
| $FORM::contacts | ||||
| 
 | ||||
| Other comments: | ||||
| --------------- | ||||
| $FORM::comments | ||||
| 
 | ||||
| [Application received at $date (Eastern time)] | ||||
| END | ||||
| 
 | ||||
| close MAIL; | ||||
| 
 | ||||
| 
 | ||||
| print "<h1>Thank you</h1>\n"; | ||||
| print "<p>Thank you for your submission.  It has been forwarded to the membership committee, which will inform you when it has been processed.</p>\n"; | ||||
| print "<p>If you have any questions, please e-mail <a href=\"mailto:membership\@gnome.org\">membership\@gnome.org.</p>\n"; | ||||
| 
 | ||||
| 
 | ||||
| 
 | ||||
		Loading…
	
	Add table
		
		Reference in a new issue
	
	 Dan Mueth
						Dan Mueth