1 files changed, 4 insertions, 4 deletions
diff --git a/check-mail-addr.pl b/check-mail-addr.pl
index 29f23c2..773830d 100755
--- a/check-mail-addr.pl
+++ b/check-mail-addr.pl
@@ -43,8 +43,8 @@ my $socket = IO::Socket::INET->new(
   Proto => "tcp") || die "Error: couldn't create socket.";
 
 print "<<  ".$socket->getline;
-post $socket,"EHLO ".hostfqdn()."\n";
-post $socket, "MAIL FROM:<>\n";
-post $socket, "RCPT TO:<$email>\n";
-post $socket, "QUIT\n";
+post $socket,"EHLO ".hostfqdn()."\r\n";
+post $socket, "MAIL FROM:<>\r\n";
+post $socket, "RCPT TO:<$email>\r\n";
+post $socket, "QUIT\r\n";