#!/usr/bin/perl -w

use CGI qw/:standard/;

print header, start_html, start_form, textfield('name'), textfield('name'), submit, end_form;
if (param) {
	my @values = param('name');
	print "first: $values[0]", br, "second: $values[1]";
}
print end_html;