Email::Simple::Creator seems to be putting too many newlines into my emails. I
can get the desired behaviour by changing the return value of _crlf() in
Creator.pm. It comes from CPAN set to "\x0d\x0a", but it works better for me
if it's "\x0a".
I use Perl v5.8.8 and Email::Simple::Creator v1.424. I also use a Qmail as
MTA. OS is Linux.
Here is my test code:
#!/usr/bin/perl
use Email::Simple;
use Email::Simple::Creator;
use IO::File;
my $somefh = new IO::File;
$email_obj = Email::Simple->create(
header => [
From => "[EMAIL PROTECTED]",
To => '[EMAIL PROTECTED]',
Subject => 'This is a subject'
],
body => "This is the body"
);
open $somefh,"|/var/qmail/bin/qmail-inject";
print $somefh $email_obj->as_string();
close $somefh;
# --------------------------
Here is the result in Mozilla Thunderbird (Windows) when Creator.ph has
"\x0d\x0a":
From - Sat Jul 12 19:19:14 2008
X-Account-Key: account2
X-UIDL: 1215861550.14312.ambassador.digitalinscription.com
X-Mozilla-Status: 0001
X-Mozilla-Status2: 00000000
X-Mozilla-Keys:
Received: (qmail 14307 invoked by uid 501); 12 Jul 2008 11:19:10 -0000
Message-ID: <[EMAIL PROTECTED]>
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: This is a subject
Date: Sat, 12 Jul 2008 19:19:10 +0800
This is the body
Here is the result in Mozilla Thunderbird (Windows) when Creator.pm has "\x0a":
From - Sat Jul 12 19:17:58 2008
X-Account-Key: account2
X-UIDL: 1215861477.14298.ambassador.digitalinscription.com
X-Mozilla-Status: 0001
X-Mozilla-Status2: 00000000
X-Mozilla-Keys:
Received: (qmail 14293 invoked by uid 501); 12 Jul 2008 11:17:57 -0000
Message-ID: <[EMAIL PROTECTED]>
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: This is a subject
Date: Sat, 12 Jul 2008 19:17:57 +0800
This is the body
BTW I censored some of the headers above.
I also checked in Outlook Express 6.
--
Rohan Carly
