$result->Append("$_\r\n\")
   for split /^/m, <<'__EOI__';
This is LINE1
This is LINE2
This is LINE3
__EOI__