#!"C:\xampp\perl\bin\perl.exe"
use strict;
use warnings;

use Email::Sender::Simple qw(sendmail);
use Email::Sender::Transport::SMTPS ();
use Email::Simple ();
use Email::Simple::Creator ();

my $smtpserver = 'localhost';
my $smtpport = 587;
my $smtpuser   = 'robot@localhost.localdomain';
my $smtppassword = 'test';

my $transport = Email::Sender::Transport::SMTPS->new({
  host => $smtpserver,
  port => $smtpport,
  ssl => "starttls",
  sasl_username => $smtpuser,
  sasl_password => $smtppassword,
});

my $email = Email::Simple->create(
  header => [
    To      => 'alexjaquet@gmail.com',
    From    => 'robot@avant-garde.no-ip.biz',
    Subject => 'Hi!',
  ],
  body => "This is my message\n",
);

sendmail($email, { transport => $transport });