print '>', $unixfrom, join("\n",
           $return_path[$j],
           $received[$j],
           $date[$j],
           $from[$j],
           $to[$j],
           $subject[$j],
           $message_id[$j],
           $mimeversion[$j],
           $content_type[$j],
           $xstatus[$j],
           $xkeywords[$j],
           $xuid[$j]);