#!/usr/bin/perl
use strict;
use warnings;
use Authen::Captcha;
# You MUST create the following directories yourself. FormMail will not work
# without them, unless you are not using Captcha support.
# Set this to a directory that is not accessible via the web.
# Often something like /home/yourname/.captcha_data
my $captcha_datadir = "/home/sites/tirnanogislay.co.uk/.captcha_data";
# Set this to a directory that will store the captcha images. This should
# be accessible via the web because it will be included on the page.
# Often something like /home/yourname/public_html/fm/captcha_img
my $captcha_outputdir = "/home/sites/tirnanogislay.co.uk/public_html/form/img";
# This should be the same as the directory above, but using the web accessible
# URL path. If you have /home/yourname/public_html/fm/captcha_img above then
# you will need /fm/captcha_img here.
my $image_dir = "/form/img";
# Use the following few settings to configure the form values.
# This should be the location of the FormMail.cgi script.
my $formmail = "/form/FormMail.cgi";
# This is where you want the email to go.
my $recipient = 'willowen@longhouseinternet.co.uk';
# This is where the user should be taken to after submitting the form.
my $redirect = "http://tirnanogislay.co.uk";
my $captcha = Authen::Captcha->new(
data_folder => $captcha_datadir,
output_folder => $captcha_outputdir,
);
my ($md5sum, $chars) = $captcha->generate_code(4);
# Modify the HTML below to make your form how you like it.
# Ensure that you read the instructions carefully.
# Only edit outside the comment sections, unless you are sure
# you know what you're doing.
print <<"END";
Content-Type: text/html; charset=ISO-8859-1
Tir Nan Og in Islay
