Select Code to Download

#!/usr/bin/perl --
use strict;
...
__END__
"Content-Disposition: inline\nContent-Transfer-Encoding: 8bit\nContent
+-Type: text/plain\nMIME-Version: 1.0\nX-Mailer: MIME::Lite 3.029 (F2.
+84; T2.04; A2.12; B3.14; Q3.13)\nDate: Fri, 8 Dec 2017 19:41:07 -0800
+\nFrom: cloudops\@example.com\nTo: cbeckley\@example.com\nSubject: te
+sting missing eol\n\nlocal_do_mail:\nSource Heart Beat TimeStamp: foo
+\nTarget Heart Beat TimeStamp: bar"
"Content-Disposition: inline\nContent-Transfer-Encoding: 8bit\nContent
+-Type: text/plain\nMIME-Version: 1.0\nX-Mailer: MIME::Lite 3.029 (F2.
+84; T2.04; A2.12; B3.14; Q3.13)\nDate: Fri, 8 Dec 2017 19:41:07 -0800
+\nFrom: cloudops\@example.com\nTo: cbeckley\@example.com\nSubject: te
+sting missing eol\n\nlocal_do_mail:\nSource Heart Beat TimeStamp: 201
+71207_113255\nTarget Heart Beat TimeStamp: bar"

"local_do_mail:\nSource Heart Beat TimeStamp: foo\nTarget Heart Beat T
+imeStamp: bar"
"local_do_mail:\nSource Heart Beat TimeStamp: 20171207_113255\nTarget 
+Heart Beat TimeStamp: bar"