Subject: | MIME::Entity: Multipart boundaries newlines not compatible with apache axis |
Date: | Thu, 29 Dec 2016 11:08:06 +0100 |
To: | bug-MIME-tools [...] rt.cpan.org |
From: | rayrick <ray.rick.mini [...] gmail.com> |
Problem raised while trying to build a SOAP client sending attachments
using SOAP::Packager and SOAP::Lite to a remote apache axis service that is
expecting CRLFs.
Discussion here:
http://www.perlmonks.org/?node_id=806606
http://www.perlmonks.org/?node_id=1178606
Perl version:
This is perl 5, version 16, subversion 3 (v5.16.3) built for
x86_64-linux-thread-multi
(with 29 registered patches, see perl -V for more detail)
Module:
D/DS/DSKOLL/MIME-tools-5.508.tar.gz
/usr/local/share/perl5/MIME/Entity.pm
Installed: 5.508
CPAN: 5.508 up to date
Dianne Skoll (DSKOLL)
dfs+pause@roaringpenguin.com
Linux ver:
Linux xxxxxx3.10.0-327.el7.x86_64 #1 SMP Thu Oct 29 17:29:29 EDT 2015
x86_64 x86_64 x86_64 GNU/Linux
Demo patch used to fix the behaviour
@@ -1828,9 +1828,9 @@ sub print_body {
### Parts:
my $part;
foreach $part ($self->parts) {
- $out->print("--$boundary\n");
+ $out->print("--$boundary\r\n");
$part->print($out);
- $out->print("\n"); ### needed for next delim/close
+ $out->print("\r\n"); ### needed for next delim/close
}
$out->print("--$boundary--\n");
Thanks for looking at it