#!/usr/bin/perl
use strict;
use CGI qw/:standard :html4/;
use CGI::Carp qw ( fatalsToBrowser );
my $query = new CGI;
print $query->header();
&logit($0." has started" );
&logit("=======================");
&logit($0." ".query_string());
my @values = $query->param('field');
my $ColorCount=@values;
print "Colors Selected: ".$ColorCount."
";
foreach my $item (@values)
{
print "Colors: ".$item."
";
}
exit;