use CGI qw/ :all /;
.
.
.
print start_form(-action=>'/cgi-bin/mycgi.pl');
print table( Tr( td(submit (-name=> "Action",
                            -value=> "Insert Next"
                            )
                   )
                )
            );
print end_form;
#
# The above is an oversimplification, but enough to get 
# the point accross (I hope!)
#