| Subject: | Mail Sender Error - Code works in 0.8.00 but is broken in all releases after |
| Date: | Tue, 28 Nov 2006 18:01:47 -0600 |
| To: | bug-Mail-Sender [...] rt.cpan.org |
| From: | crom <crom [...] ccccorp.com> |
This is perl, v5.8.8 built for i586-linux-thread-multi
Linux newmail 2.6.16.13-4-smp #1 SMP Wed May 3 04:53:23 UTC 2006 i686
i686 i386 GNU/Linux
opensuse 10.1
postfix-2.2.9-10
A routine that has been running for a long time quit working when
transferring to a new mail server with the release of s/w as above
email is sent out when an error condition arises to let someone know
what is going on
The routine fails to send the body of the email to the mail server. See
the debug files attached.
I ran it through multiple versions, the last one that that I tested and
works is 0.8.00 I did not test 0.8.03, 8.04, 8.05
message from the email server is as follows:
Nov 28 17:46:07 newmail postfix/smtpd[12681]: connect from
newmail.ccccorp.net[172.16.1.110]
Nov 28 17:46:07 newmail postfix/smtpd[12681]: 7194A101C0:
client=newmail.ccccorp.net[172.16.1.110]
Nov 28 17:46:07 newmail postfix/smtpd[12681]: lost connection after DATA
from newmail.ccccorp.net[172.16.1.110]
Nov 28 17:46:07 newmail postfix/smtpd[12681]: disconnect from
newmail.ccccorp.net[172.16.1.110]
Lost connection caused by the body and the final "." not being sent.
see log attached
code that causes the error as follows:
sub sendnofile {
my $fromemail = shift;
$fromemail = $fromemail . ',crom@freedommedicalsystem.com';
$sender = new Mail::Sender ({ from => 'crom@freedommedicalsystem.com',
smtp => 'mail' });
$sender->Open({to => $fromemail,
subject => "Invalid request"});
$sender->Body;
$sender->SendEnc(<<"*END*");
You requested appointment list for an invalid physician
If you feel you recieved this email in error, please call
Custom Computing at (402) 341-2197.
Custom Computing
*END*
$sender->Close;
}
#----END OF sendnofile
Running Mail Sender Version 0.7.14 - This version works
Show quoted text
>> 220 newmail.ccccorp.net ESMTP Postfix
<< ehlo localhost
Show quoted text>> 250-newmail.ccccorp.net
>> 250-PIPELINING
>> 250-SIZE 10240000
>> 250-VRFY
>> 250-ETRN
>> 250 8BITMIME
<< mail from: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< data
Show quoted text>> 354 End data with <CR><LF>.<CR><LF>
<< To: Roger Crom
<crom@freedommedicalsystem.com>,crom@freedommedicalsystem.com
<< From: crom@freedommedicalsystem.com
<< X-Mailer: Perl script "twcschedule_process"
<< using Mail::Sender 0.7.14.1 by Jenda Krynicky
<< running on localhost (127.0.0.1)
<< under account ""
<< Date: Tue, 28 Nov 2006 17:37:58 -0600
<< Message-ID: <20061128_233758_025196.crom@freedommedicalsystem.com>
<< Subject: Invalid request
<<
<<
<< You requested appointment list for an invalid physician
<<
<< If you feel you recieved this email in error, please call
<< Custom Computing at (402) 341-2197.
<<
<< Custom Computing
<<
<<
<< .
Show quoted text>> 250 Ok: queued as 9A47C10167
<< quit
Show quoted text>> 221 Bye
Running Mail Sender Version 0.8.00 - This version works
Show quoted text>> 220 newmail.ccccorp.net ESMTP Postfix
<< ehlo localhost
Show quoted text>> 250-newmail.ccccorp.net
>> 250-PIPELINING
>> 250-SIZE 10240000
>> 250-VRFY
>> 250-ETRN
>> 250 8BITMIME
<< mail from: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< data
Show quoted text>> 354 End data with <CR><LF>.<CR><LF>
<< To: Roger Crom
<crom@freedommedicalsystem.com>,crom@freedommedicalsystem.com
<< From: crom@freedommedicalsystem.com
<< Subject: Invalid request
<< Date: Tue, 28 Nov 2006 17:39:54 -0600
<< X-Mailer: Perl script "twcschedule_process"
<< using Mail::Sender 0.8.00 by Jenda Krynicky
<< running on localhost (127.0.0.1)
<< under account ""
<< Message-ID: <20061128_233954_040418.crom@freedommedicalsystem.com>
<<
<<
<< You requested appointment list for an invalid physician
<<
<< If you feel you recieved this email in error, please call
<< Custom Computing at (402) 341-2197.
<<
<< Custom Computing
<<
<<
<< .
Show quoted text>> 250 Ok: queued as A172B1018F
<< quit
Show quoted text>> 221 Bye
Running Mail Sender Version 0.8.06 - All versions after this do not work
Show quoted text>> 220 newmail.ccccorp.net ESMTP Postfix
<< ehlo localhost
Show quoted text>> 250-newmail.ccccorp.net
>> 250-PIPELINING
>> 250-SIZE 10240000
>> 250-VRFY
>> 250-ETRN
>> 250 8BITMIME
<< mail from: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< data
Show quoted text>> 354 End data with <CR><LF>.<CR><LF>
<< To: Roger Crom
<crom@freedommedicalsystem.com>,crom@freedommedicalsystem.com
<< From: crom@freedommedicalsystem.com
<< Subject: Invalid request
<< Date: Tue, 28 Nov 2006 17:41:51 -0600
<< X-Mailer: Perl script "twcschedule_process"
<< using Mail::Sender 0.8.06 by Jenda Krynicky, Czechlands
<< running on localhost (127.0.0.1)
<< under account ""
<< Message-ID: <20061128_234151_088619.crom@freedommedicalsystem.com>
<<
Running Mail Sender Version 0.8.10
Show quoted text>> 220 newmail.ccccorp.net ESMTP Postfix
<< ehlo localhost
Show quoted text>> 250-newmail.ccccorp.net
>> 250-PIPELINING
>> 250-SIZE 10240000
>> 250-VRFY
>> 250-ETRN
>> 250 8BITMIME
<< mail from: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< rcpt to: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< data
Show quoted text>> 354 End data with <CR><LF>.<CR><LF>
<< To: Roger Crom
<crom@freedommedicalsystem.com>,crom@freedommedicalsystem.com
<< From: crom@freedommedicalsystem.com
<< Subject: Invalid request
<< Date: Tue, 28 Nov 2006 17:36:51 -0600
<< X-Mailer: Perl script "twcschedule_process"
<< using Mail::Sender 0.8.10 by Jenda Krynicky, Czechlands
<< running on localhost (127.0.0.1)
<< under account ""
<< Message-ID: <20061128_233651_023517.crom@freedommedicalsystem.com>
<<
<< quit
Running Mail Sender Version 0.8.13
Show quoted text>> 220 newmail.ccccorp.net ESMTP Postfix
<< EHLO localhost
Show quoted text>> 250-newmail.ccccorp.net
>> 250-PIPELINING
>> 250-SIZE 10240000
>> 250-VRFY
>> 250-ETRN
>> 250 8BITMIME
<< MAIL FROM: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< RCPT TO: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< RCPT TO: <crom@freedommedicalsystem.com>
Show quoted text>> 250 Ok
<< DATA
Show quoted text>> 354 End data with <CR><LF>.<CR><LF>
<< To: Roger Crom
<crom@freedommedicalsystem.com>,crom@freedommedicalsystem.com
<< From: crom@freedommedicalsystem.com
<< Subject: Invalid request
<< Date: Tue, 28 Nov 2006 17:44:25 -0600
<< X-Mailer: Perl script "twcschedule_process"
<< using Mail::Sender 0.8.13 by Jenda Krynicky, Czechlands
<< running on localhost (127.0.0.1)
<< under account "nobody"
<< Message-ID: <20061128_234425_082372.crom@freedommedicalsystem.com>
<<
<< quit