require "cgi-bin.pl"; & readparse("valuse"); print "content-type:text/test.html\n\n"; print "\n"; print "<h2>mindset</h2>\n"; &name; &e-mail; &dress; &way; &flower; &response; ℰ print"</body></html>\n"; exit 0; sub name{ print"name:"$values{'name'},"<br>\n"; } sub E-mail{ print"E-Mail:"$values{'e-mail'},"<br>\n"; } sub dress{ print"you are :"$values{'dress'},"<br>\n"; } sub way{ print"you are:"$values{'way'},"<br>\n"; } sub flower{ print"you are:"$values{'flower'},"<br>\n"; } sub response{ print"you are:"$values{'response'},"<br>\n"; } sub expectation{ print"you are:"$values{'expectation'},"<br>\n"; } print"</ul>\n"; }<!--'"-->
Make your own free website on Tripod.com