#!/usr/bin/perl
#############################################################################
#
# mail.cgi -- Help on signing up to the FX mailing lists.
#
# $License:
#
# Copyright (C) Kenneth A. Kittlitz, All Rights Reserved.
#
# Unless explicitly acquired and licensed from Licensor under a
# separate arrangement, the contents of this file are subject to the
# Idea Futures Public License ("IFPL") Version 1.0, or subsequent
# versions as allowed by the IFPL, and You may not copy or use this file
# in either source code or executable form, except in compliance with the
# terms and conditions of the IFPL.
#
# The IFPL V1.0 is identical to the Reciprocal Public License V1.1 as
# published at , with the
# following two changes to term 13.8:
#
# [start of changes]
# Change 1) Replace:
# "This License shall be governed by Colorado law provisions..."
# with:
# "This License shall be governed by Alberta law provisions...".
#
# Change 2) Replace:
# "You further agree that Adams County, Colorado USA is proper venue..."
# with:
# "You further agree that Alberta, Canada is proper venue...".
# [end of changes]
#
# All software distributed under the License is provided strictly on
# an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR
# IMPLIED, AND KENNETH A. KITTLITZ HEREBY DISCLAIMS ALL SUCH
# WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT,
# OR NON-INFRINGEMENT. See the License for specific language
# governing rights and limitations under the License.
#
# :License$
#
#############################################################################
use strict;
use CGI;
require "Common.pl";
my (@content,$data);
my $query = new CGI;
print $query->header;
my $title = "Foresight Exchange Mailing Lists";
my $header = "Mailing Lists";
$data = <
Instructions
Fill in your e-mail address, choose a mailing list, select one or more commands, then press the Submit button:
Hypermail archives of all the lists are available.
The Foresight Exchange mailing lists are maintained by Ken Kittlitz (kittlitz AT ideosphere DOT com).
EOT
push(@content,$data);
&showHtml(8,$title,$header,undef,undef,@content);