Tests: drop our own CRLF constant, use Socket's one instead.

_common.pm

diff --git a/_common.pm b/_common.pm
index 44b02f7..c4271cb 100644
--- a/_common.pm
+++ b/_common.pm
@@ -12,15 +12,14 @@
 use base qw/ Exporter /;
 
 our @EXPORT = qw/ start_nginx smtp_connect smtp_send smtp_read smtp_check
-	smtp_ok log_in log_out CRLF http /;
+	smtp_ok log_in log_out http /;
 
 ###############################################################################
 
 use Test::More;
 use File::Temp qw/ tempdir /;
 use IO::Socket;
-
-use constant CRLF => "\x0D\x0A";
+use Socket qw/ CRLF /;
 
 our $testdir;
 our $s;

smtp.t

diff --git a/smtp.t b/smtp.t
index 318f6f4..0f8ba88 100644
--- a/smtp.t
+++ b/smtp.t
@@ -12,6 +12,7 @@
 use Test::More tests => 28;
 
 use MIME::Base64;
+use Socket qw/ CRLF /;
 
 use _common;