NetSmtp

[Maikl]

Помогите разобраться
пытаюсь выполнить

Code: [Select]

<?
#!/usr/bin/perl
use Net::SMTP;
$smtp = Net::SMTP->new('relay.tomsknet.ru');

$smtp->mail('[email protected]');
$smtp->to('[email protected]');

$smtp->data();
$smtp->datasend("To: [email protected] \n");
$smtp->datasend("\n");
$smtp->datasend("test message\n");
$smtp->dataend();

$smtp->quit;
?>
выдаётся ошибка Parse error: syntax error, unexpected T_STRING, expecting T_CONSTANT_ENCAPSED_STRING or '(' in /usr/local/www/data/forum/mail/rominfo.php on line 3

модуль NetSmtp установлен
OS FreeBSD 7.1 php 5

[Diver]

А у вас .php файлы обрабатываются perl-ом или php?

[Maikl]

обрабатывается php

[Diver]

обрабатывается php

Может я чего-то не понимаю... А как php должен обрабатывать perl код? Может вы конечно какой-то extension юзаете... Но пока что у вас ситуация такая как будто вы pascal пытаетесь откомпилить в c++

[Maikl]

Да спасибо я уже разобрался, просто новичок в этом деле. Мне нужно было bitrix заставить рассылать почту через perl (настройкой почтовых серверов не занимался).