#!/usr/bin/perl -w use CGI ':standard'; use Mail::Sendmail;