Ошибка perl's Net :: SMTP в значении 'to'

Question

Я пытаюсь отправить электронное письмо, используя perl-модуль Net :: SMTP, и у меня есть код, который выглядит следующим образом:

my $host = 'mail.server.com';

my $port = 00; 
my $smtp = new Net::SMTP("$host:$port") or return 1;

$smtp->mail('me@mail.com') or return 1;
$smtp->to('you@mail.com') or return 1;
$smtp->data() or return 1;
$smtp->datasend("Subject: blah, blah\n\n");
$smtp->datasend($message);

$smtp->dataend() or return 1;

$smtp->quit();

Проблема в том, что он возвращается после попытки установить значение 'to', и я полностью озадачен, почему. Есть идеи?

FWIW, я не разработчик Perl. Я пытаюсь очистить стилистику письма, и мне просто нужно отправить его, чтобы я мог оценить свои изменения.

Answer 1

Chanhe your To part

$smtp->to('you@mail.com') or return 1;

EDIT:

В этом случае сделайте еще несколько изменений и посмотрите, поможет ли это

use strict;
use warnings;
my $host = 'mail.server.com';
my $port = '00';

 my $smtp = new Net::SMTP($host:$port) or 
 die "Could not connect to server!\n" unless $smtp;

 //Rest of the code as is