#!/usr/bin/perl

use CGI;
use CGI::Carp qw(fatalsToBrowser);
use Mail::Mailer::sendmail;

  %mail = ( To      => 'me@myisp.com',
            From    => 'info@mywebsite.com',
            Message => "This is a very short message"
           );

  sendmail(%mail) or die $Mail::Mailer::sendmail::error;

  print "OK. Log says:\n", $Mail::Mailer::sendmail::log;