#!/usr/bin/perl5
use CGI;
CGI::ReadParse(*vars);
print "Content-type: text/html\n\n";
print <<"TheEnd";
Environment Variables
TheEnd
;
print "TextInput was set to $vars{'TextInput'}
\n";
print "SelBox was set to $vars{'SelBox'}
\n";
print "HiddenStuff was set to $vars{'HiddenStuff'}
\n";
print <<"TheEnd";
TheEnd
;