#!/usr/local/bin/perl5 -w

require "cgi-lib-24.pl";

MAIN:
{
  # Read in all the variables set by the form
  &ReadParse(*input);

  # Print the header
  print &PrintHeader;
  print &HtmlTop ("On-line streetplan attribute files listing");

  $featuretype = $input{'type'};

  print <<ENDOFTEXT;

<blockquote><strong>This facility is still under development!</strong></blockquote>
<p>Searching for a $type providing $provides and open at $opening.</p>

ENDOFTEXT



  print "\n<hr>\n<a href=\"http://www.cb1.com/cb1/\"><img align=\"right\" alt=\"CB1 home\" src=\"../../www/small-CB1-home.gif\"></a>\n";
  
  # Close the document cleanly.
  print &HtmlBot;
}