my $msg_body_1 = join '',
   "line 1\n",
   "line 2\n",
   "line3a  \t  \line3b\n",
   "line4",
   "\n\n",
;