#!C:/perl/bin/perl.exe
use CGI;
$query = new CGI;

print $query->header;
print $query->start_html(-title=>'2D Graph Demo');
print "<FORM ACTION='/cgi-bin/graph2d.pl' METHOD='post'>";
print "<FONT FACE = 'arial' SIZE = '2'>";
print "Two-dimensional graphing demo.<BR>";

print "Please enter the x and y coordinates for the point you'd like to plot.<BR>";
print "x <INPUT TYPE='textbox' NAME='xcoord' MAXLENGTH=3 SIZE=3><BR>";
print "y <INPUT TYPE='textbox' NAME='ycoord' MAXLENGTH=3 SIZE=3><BR><BR>";

print "Please enter the minimum and maximum possible values of these variables.<BR>";
print "min <INPUT TYPE='textbox' NAME='xmin' MAXLENGTH=3 SIZE=3><BR>";
print "max <INPUT TYPE='textbox' NAME='xmax' MAXLENGTH=3 SIZE=3><BR>";

print "<INPUT TYPE='submit'>";
print "</FORM>";
print $query->end_html;