Send an email on a system where 'sendmail' is running

first-email.pl

#!/usr/bin/env perl
use strict;
use warnings;
use 5.12.0;
use Email::Sender::Simple qw(sendmail);
use Email::Simple;
use Email::Simple::Creator;

my $instructions =
    'http://search.cpan.org/~rjbs/Email-Sender-1.300031/lib/Email/Sender/Manual/QuickStart.pm';
my $body = <<EOF;
This message is short, but at least it's cheap.
It's adapted directly from $instructions.
EOF

my $email = Email::Simple->create(
  header => [
    To      => q|"James E Keenan" <[email protected]>|,
    # Don't try to send me mail at thenceforward.net; use pobox.com address
    From    => q|"Jim Keenan's Linode" <[email protected]>|,
    Subject => q|Email via Email::Simple and Email::Sender::Simple|,
  ],
  body => $body,
);

{
    local $@;
    eval {
        sendmail($email);
    };
    if ($@) { say "Problem: <$@>"; }
    else { say "Finished"; }
}