Добрый день!
Не подскажет ли многоуважаемый ALL в чем засада.
Есть скрипт, отправляющий почту, четно списанный с одного из местных примеров:
| Код |
my $from = '[email protected]';
my $to = '[email protected]';
my $server = 'server.ru';
my $message = "текст письма";
my $smtp = Net::SMTP->new($server,
Hello => "$server",
Timeout => 10,
Debug => 1
) or die "Error :(";
$smtp->mail($from);
$smtp->to($to);
$smtp->data;
$smtp->datasend('To: '.$to."\n");
$smtp->datasend('Subject: anketa\n\n');
$smtp->datasend("$message\n");
$smtp->dataend;
$smtp->quit;
|
Все работает, письмо приходит, но есть указанный в сабжекте трабл - текст для тела письма стабильно оказывается в поле Subject.
Как бы это вылечить, а?
Гран мерси. |
)
)