#!/usr/bin/perl -w $| = 1; use strict; use warnings; use CGI qw(:standard); print header, start_html( -bottomMargin => 0, -leftMargin => 0, -topMargin => 0, -rightMargin => 0, -marginheight => 0, -marginwidth => 0, ); print start_form (-action =>url()); print "
";
print "
|