1
2
3
4
5
6
7
8

use strict;
use warnings;

open (MAIL, "|/usr/sbin/sendmail myemail\@gmail.com");
print MAIL "Subject: Hi there\r\n";
print MAIL "Hi zok!\r\n";
print MAIL ".";
close MAIL;