#!/usr/bin/perl use CGI qw(:standard); use strict; sub printpage(); printpage(); exit; sub printpage(){ print << "EOF"; Thanks for your request

Thanks for submitting your information. We will get back to you shortly


EOF }