@array_and = 'AND'

##</code><code>##

use CGI qw(:standard Vars);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

use strict;

print header;
print start_html("Test");

my %form = Vars();

map { print ("$_ = $form{$_}<br>\n"); } keys(%form);
print end_html();