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…
Reference in a new issue