#!/usr/bin/perl -w

eval 'exec perl -w -S $0 ${1+"$@"}'
    if 0; # not running under some shell

require 5;
use strict;
use CGI;

my $cgi = new CGI;

my $email = $cgi->param('visitor_email_address');
my $password = $cgi->param('visitor_password');

print $cgi->header('text/plain');