for ($i=0; $i<$filelength; $i++) {
     $message_body_lines[$i]=~/\b/g;
     $metadata.=$message_body_lines[$i];     
   }