#!/usr/bin/perl
#Program name: perlscript
print"Content-type: text/html\n\n"; #The HTTP header
print" CGI/My First Form\n";
print"\n";
print"Processing CGI form:";
$formvalues=$ENV{QUERY_STRING};
@formvalues=split(" ", $formvalues);
print"$formvalues[0]\n";
print "\n";