#!/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 ""; print ""; print ""; print ""; print ""; print "
  
"; print "
"; print end_form(); print end_html; exit; 1;