#!/usr/bin/perl 
use CGI;
my $query = new CGI;
my $xmin = $query->param('xmin');
my $xmin = $query->param('xmax');

print "Content-type:text/html\n\n";

print "<html>";



if( $ENV{"REQUEST_METHOD" eq "GET"} )

     {

            ($key, $value) = split(/=/,$ENV{"QUERY_STRING"});

     }

print "<li>Key is \" $key \" ";

print "<li>Value is \" $value \" ";

print "</html>";