<pre>
<?
/*************************************************************
*                                                            *
*  2001-09-20 18:32 오세원(sewona at yahoo.com)                 *
*  Encoded EMail                                             *
*                                                            *
*  허접한 프로그램이지만 이를 응용해서 더 훌륭하게 코딩하여  *
*  사용하시기 바랍니다.                                      *
*                                                            *
*************************************************************/
function EncodeEMail($mail) {
  $EncodedEMail = array("a"=>"&#97;","b"=>"&#98;","c"=>"&#99;","d"=>"&#100;","e"=>"&#101;",
                        "f"=>"&#102;","g"=>"&#103;","h"=>"&#104;","i"=>"&#105;","j"=>"&#106;",
                        "k"=>"&#107;","l"=>"&#108;","m"=>"&#109;","n"=>"&#110;","o"=>"&#111;",
                        "p"=>"&#112;","q"=>"&#113;","r"=>"&#114;","s"=>"&#115;","t"=>"&#116;",
                        "u"=>"&#117;","v"=>"&#118;","w"=>"&#119;","x"=>"&#120;","y"=>"&#121;",
                        "z"=>"&#122;",":"=>"&#58;","."=>"&#46;","_"=>"&#95;","@"=>"&#64;",
                        "0"=>"&#48;","1"=>"&#49;","2"=>"&#50;","3"=>"&#51;","4"=>"&#52;",
                        "5"=>"&#53;","6"=>"&#54;","7"=>"&#55;","8"=>"&#56;","9"=>"&#57;"
                       );
   $max = strlen($mail);
  for($i=0;$i<$max;$i++) {
    $changemail = $EncodedEMail[substr($mail, $i, 1)];
    $returnmail = $returnmail.$changemail;
  }
  return $returnmail;
}
$email = "mailto:sewona at yahoo.com";
$email = EncodeEMail($email);
 echo "email=[<a href='$email'>$email</a>]";
 ?>
</pre>--세원