Помогите плз скриптик доработать...

[Viator]

Люди добрые, помогите пожалуйста доработать скрипт для отправки данных из формы на мыло. Скрипт работает, я только не знаю, как сделать:
1)чтобы письмо приходило в кодировке Кириллица(Windows)
2)чтобы при нажатии кнопки "отправить" после заполнения формы скрипт не загружал бы новую страницу, а оставался бы на той же самой, где форма.

Вот исходники:

1)форма:

http://test.vd.ruweb.net/cgi-bin/prices.cgi" enctype="application/x-www-form-urlencoded">
             

Ваше имя:
               
             

             

Ваш E-mail:
               
             

             

Перечень необходимых прайс-листов в рассылке:
               
             

             

               
               
             

           


2) скрипт:

#!/usr/bin/perl
use CGI;

$co=new CGI;

print $co->header;

$co->start_html(
-title=>\'Elisey: prices subscribe\', -author=>\'Viator\',
-BGCOLOR=>\'white\', -LINK=>\'red\');

if ($co->param()) {
$from=$co->param(\'email\');
$from=~ s/@/\\@/;
$subject=\'Elisey: prices subscribe\';
$text=$co->param(\'prices\');
$text=~ s/open(MAIL, \'| /usr/sbin/sendmail -t -oi\');
print MAIL <To: sp2003\\@bk.ru
From: $from
Subject: $subject
$text
EOF
close MAIL;
}

[Phoinix]

чтобы письмо приходило в кодировке Кириллица(Windows)

Боюсь ошибится, но все же: После:
Subject: $subject
Content-type: text/html; charset=windows-1251\\n\\n
$text

чтобы при нажатии кнопки "отправить" после заполнения формы скрипт не загружал бы новую страницу, а оставался бы на той же самой, где форма

После завершения работы скрипта, но с учетом того, что print $co->header; прийдется убрать:
$refer = $ENV{\'HTTP_REFERER\'};
print "Location: $refer\\n\\n";

А вообще поиск по форуму рулит...

[OFF]модераторам, кстати когда FAQ по Perl тут заработает?[/OFF]