#######################################################################
# Email Variables #
#######################################################################
$should_i_mail = "no";
$should_i_send_user_email = "no";
$email_of_sender = "you\@yourdomain.com";
$email_to = "me\@mydomain.com, you\@yourdomain.com";
$email_subject = "Feedback Form";
#######################################################################
# PGP Variables #
#######################################################################
$should_i_use_pgp = "no";
$pgp_lib_path = "./Library/pgp-lib.pl";
$pgp_temp_file_path ="/home/selena/public_html/Mis/Form_processor/Temp";
#######################################################################
# Location Variables #
#######################################################################
$url_of_the_form = "http://cti.itc.virginia.edu/meg3c/cgi-bin/Forms/survey.cgi";
$location_of_mail_lib = "./Library/mail-lib.pl";
$location_of_setup_file = "survey.setup";
#######################################################################
# Database Variables #
#######################################################################
$should_I_append_a_database = "yes";
$location_of_database = "./Databases/feedback.data";
$database_delimiter = "\|";
#######################################################################
# Defining your Fields #
#######################################################################
@form_variables = ("quest1",
"comments");
%form_variable_name_map = ("name", "Name",
"client_email", "Client Email",
"comments", "Comments");
# @required_variables = ("name", "client_email", "comments");
#######################################################################
# MIscellaneous Options #
#######################################################################
$current_century = "20";
$should_user_verify = "no";
#######################################################################
# required_fields_error_message Subroutine #
#######################################################################
sub required_fields_error_message
{
print "Content-type: text/html\n\n";
print qq~
Error in Processing Form - Required Fields
Woops, I'm sorry, the following fields are required:
Please click the "back" button on your browser or click here to go back and make sure you fill out all
the required information.
~;
}
#######################################################################
# cannot_find_database Subroutine #
#######################################################################
sub cannot_find_database
{
print "Content-type: text/html\n\n";
print qq~
Form Processing Error - Database Access
I'm sorry, I am having trouble finding the database that this
information should be sent to. Please contact
$email_to and let us know that there
has been a problem. Thank you very much and sorry about the
inconvenience.
~;
}
#######################################################################
# HTML Reply Subroutines #
#######################################################################
sub html_reply_header
{
print "Content-type: text/html\n\n";
print qq~
Thank you
#
#
#
~;
}
sub html_reply_body
{
print qq~
Thank you very much for taking the time to send us your feedback. A
continual interaction between us will assure that future products are
better suited towards your needs.
~;
}
sub html_reply_footer
{
print qq~
~;
}
#######################################################################
# display_verification_screen Subroutines #
#######################################################################
sub display_verification_screen
{
print "Content-type: text/html\n\n";
print qq~
Form Verification Screen
~;
}
1;