[gOloVasTicK '~]

Вот этот код надо в email.cgi написать.
Причем блокнот не подходит!!!! Пиши в far'e (благо скачать его можно где угодно). Можно написать в Блокноте, а Фаре пересохранить в формате Юникс.

#!/usr/bin/perl

$query=$ENV{'QUERY_STRING'};
@formfields=split(/&/,$query);
foreach(@formfields){
        if(/^name=(.*)/){$name=&urldecode($1);}
        if(/^content=(.*)/){$content=&urldecode($1);}
}
$mailbody="Name=$name\nContent=$content\n";
$from="MySiteForm";
$sendto="my@email.jp";
$subject="MySubject";

open(MAIL, '| /usr/sbin/sendmail -t -oi');
print MAIL <<EOF;
To: $sendto
From: $from
Subject: $subject

$mailbody

EOF
close MAIL;

print "Content-Type: text/html\n\n";
print "Message successfully sent!!!\n";

sub urldecode{
   local($val)=@_;
   $val=~s/\+/ /g;
   $val=~s/%([0-9A-H]{2})/pack('C',hex($1))/ge;
   return $val;
}