错误 SMTP 554 5.7.1 和 221 2.7.0

我有一个专用的服务器，连接到Web托管以通过协议发送字母 SMTP, 但我犯了错误 554 5.7.1 和 221 2.7.0, 并没有发送电子邮件。 全杂志 SMTP 以下。

这是一个发送电子邮件的脚本 Perl:

    my $mail = "mail.bellakabelky.sk";

        my $pass = "secret";

        my $user = "mail\@bellakabelky.sk";

        my $to = "tomsk.slovak\@gmail.com";



        use Data::Dumper;

        use Net::SMTP;

        use Mail::Mailer qw(sendmail);



        my $smtp = Net::SMTP->new(

                                              Host => $mail,

                                              Port => '25',

                                              Hello => 'dev.bellakabelky.sk',

                                              Timeout => 30,

                                              Debug   => 1,

                                            );

        print Dumper($smtp);

        $smtp->auth($user,$pass);

        $smtp->mail($user);

        $smtp->to($to);

        $smtp->recipient($to);

        $smtp->data();

        $smtp->datasend("To: Tomsk <$to>\r\n");

        $smtp->datasend("From: Mail <$user>\r\n");

        $smtp->datasend("Return-Path: $user\r\n");

        $smtp->datasend("Reply-To: $user\r\n");

        $smtp->datasend("Subject: Subject\r\n");

        $smtp->datasend("\r\n");

        $smtp->datasend("hello");

        $smtp->dataend();

        $smtp->quit;

我得到了 554 错误 5.7.1 和 221 2.7.0. 这是一本杂志 SMTP:

Net::SMTP>>> Net::SMTP(2.33)

Net::SMTP>>>   Net::Cmd(2.30)

Net::SMTP>>>     Exporter(5.71)

Net::SMTP>>>   IO::Socket::INET(1.35)

Net::SMTP>>>     IO::Socket(1.38)

Net::SMTP>>>       IO::Handle(1.35)

Net::SMTP=GLOB(0x51d1810)<<< 220 mail4-1.hostmaster.sk ESMTP Postfix

Net::SMTP=GLOB(0x51d1810)>>> EHLO dev.bellakabelky.sk

Net::SMTP=GLOB(0x51d1810)<<< 250-mail4-1.hostmaster.sk

Net::SMTP=GLOB(0x51d1810)<<< 250-PIPELINING

Net::SMTP=GLOB(0x51d1810)<<< 250-SIZE 104857600

Net::SMTP=GLOB(0x51d1810)<<< 250-ETRN

Net::SMTP=GLOB(0x51d1810)<<< 250-STARTTLS

Net::SMTP=GLOB(0x51d1810)<<< 250-AUTH PLAIN LOGIN

Net::SMTP=GLOB(0x51d1810)<<< 250-AUTH=PLAIN LOGIN

Net::SMTP=GLOB(0x51d1810)<<< 250-ENHANCEDSTATUSCODES

Net::SMTP=GLOB(0x51d1810)<<< 250 8BITMIME

$VAR1 = bless( \*Symbol::GEN1, 'Net::SMTP' );

Net::SMTP=GLOB(0x51d1810)>>> AUTH PLAIN bWFpbEBiZWxsYWthYmVsa3kuc2sAbWFpbEBiZWxsYWthYmVsa3kuc2sARXNob3AxMjNrYWJlbGt5

Net::SMTP=GLOB(0x51d1810)<<< 235 2.7.0 Authentication successful

Net::SMTP=GLOB(0x51d1810)>>> MAIL FROM:<mail@bellakabelky.sk>

Net::SMTP=GLOB(0x51d1810)&lt;&lt;&lt; 250 2.1.0 Ok

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; RCPT TO:<tomsk.slovak@gmail.com>

Net::SMTP=GLOB(0x51d1810)&lt;&lt;&lt; 554 5.7.1 <mail@bellakabelky.sk>: Sender address rejected: Your mail account (mail@bellakabelky.sk) was compromised. Please change your password immediately after next login and contact technical support.

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; RCPT TO:<tomsk.slovak@gmail.com>

Net::SMTP=GLOB(0x51d1810)&lt;&lt;&lt; 554 5.7.1 <mail@bellakabelky.sk>: Sender address rejected: Your mail account (mail@bellakabelky.sk) was compromised. Please change your password immediately after next login and contact technical support.

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; DATA

Net::SMTP=GLOB(0x51d1810)&lt;&lt;&lt; 554 5.5.1 Error: no valid recipients

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; To: Tomsk <tomsk.slovak@gmail.com>

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; From: Mail <mail@bellakabelky.sk>

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; Return-Path: mail@bellakabelky.sk

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; Reply-To: mail@bellakabelky.sk

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; Subject: Subject

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt;

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; hello

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; .

Net::SMTP=GLOB(0x51d1810)&lt;&lt;&lt; 221 2.7.0 Error: I can break rules, too. Goodbye.

Net::SMTP=GLOB(0x51d1810)&gt;&gt;&gt; QUIT

Net::SMTP: Unexpected EOF on command channel at (eval 187) line 49.

老实说，我不知道哪里可能有问题，我正在寻找决定，但我没有找到任何东西。
</mail@bellakabelky.sk></tomsk.slovak@gmail.com></mail@bellakabelky.sk></tomsk.slovak@gmail.com></mail@bellakabelky.sk></tomsk.slovak@gmail.com></mail@bellakabelky.sk>