#! /usr/bin/perl
use CGI;
use strict;
my $q = new CGI;
print $q->header;
print $q->start_html(-title=>'macCopy');
print $q->start_form(-enctype=>&CGI::URL_ENCODED, -action=>"myAction.pl");
print $q->submit(-name=>'submit', -value=>'GoForIt');
print $q->hidden('hidKey','hidVal');
print $q->endform;
print $q->end_html;