#!/usr/bin/perl -w

#Any CGI coding needs this line, uncomment when the script stops working
#BEGIN { $| = 1; open(STDERR, ">&STDOUT"); print "Content-Type: text/plain\n\n  Text/plain debug header activiated\n"; }

use strict;
use diagnostics;

use CGI;
#use CGI::Debug;