Kódování

<?php
// format $data using RFC 2045 semantics
$new_string = chunk_split(base64_encode($data));
?>

<?php
function autoUTF($s)
{
    // detect UTF-8
    if (preg_match('#[\x80-\x{1FF}\x{2000}-\x{3FFF}]#u', $s))
        return $s;
    // detect WINDOWS-1250
    if (preg_match('#[\x7F-\x9F\xBC]#', $s))
        return iconv('WINDOWS-1250', 'UTF-8', $s);
    // assume ISO-8859-2
    return iconv('ISO-8859-2', 'UTF-8', $s);
}

function cs_mail ($to, $predmet, $zprava, $head = "")
       {  $predmet = "=?utf-8?B?".base64_encode(autoUTF ($predmet))."?=";
          $head .= "MIME-Version: 1.0\n";
          $head .= "Content-Type: text/plain; charset=\"utf-8\"\n";
          $head .= "Content-Transfer-Encoding: base64\n";
          $zprava = base64_encode (autoUTF ($zprava));
          $stav = mail ($to, $predmet, $zprava, $head);
          return $stav ?  TRUE : FALSE;  }
          
$zprava = "
Desatero úspěšného a kvalitního čtenáře.

Tady je asi 3000 znaků.

Všimněte si také, prosím, že se vpravo nahoře na úvodní stránce mého Blábolníku objevila zbrusu nová sekce nazvaná „Vyloveno z internetu“. Nestyďte se mi poslat tip na zajímavý, poučný či kontroverzní článek. Pokud bude stát za to, rád odkaz zveřejním. Nesmí ale pocházet z extra-, hyper- či megablogu.
";

if (cs_mail ("*****@gmail.com", "Test", $zprava))
  echo "OK";
 else
  echo "KO";
?>