#!/usr/bin/perl -w
use CGI;
my $q = new CGI;

print $q->header,
	$q->start_html,
	$q->start_table;
# etc