title: Perl/MIME encoded text trouble
body: <p>I have a MIME-encoded messages (in Maildir), that are having both base64-encoded headers (solved by lurking for related question ( <a href="https://stackoverflow.com/questions/126070/decode-an-utf8-email-header">Decode an UTF8 email header</a> ), decode('MIME-Header', $val), main body in plain text and a text/plain base64 encoded data in the body;</p>
  
  <p>It is said, that base64 data is encoded in utf-8.
  However, when I do:</p>
  
  <pre><code>use MIME::Base4;
  ..
  $decoded = decode_base64($block_from_line_array); # MIME body extracted from message's
  $msgtext .= $decoded;
  ..
  print decode('utf-8', $msgtext);
  </code></pre>
  
  <p>It seems that the block is decoded incorrectly.</p>
  
  <pre><code>print decode('utf-8', $msgtext); works ok, when message body is in utf-8
  </code></pre>
  
  <p>Attach:</p>
  
  <pre><code>X-Priority: 3
  X-Mailer: PHPMailer (phpmailer.sourceforge.net) [version 2.0.4]
  X-Mailer: http://www.we.praise.buggy.php.scripts.what.we.do.when.we.dont.do.us
  X-MessageID: 140
  MIME-Version: 1.0
  Content-Type: multipart/alternative;
   boundary="b1_16819d4d69564bfc0185ed5b9508ad31"
  
  &lt;Here the body begins -- mhambra&gt;
  --b1_16819d4d69564bfc0185ed5b9508ad31
  Content-Type: text/plain; charset = "utf-8"
  Content-Transfer-Encoding: base64
  &lt;MIME BLOCK&gt;
  </code></pre>
  
  <p>Message is known to be displayed correctly in GMail.</p>