* use -> require

diff --git a/perl/lib/Mail/Rspamd/Client.pm b/perl/lib/Mail/Rspamd/Client.pm
index 7a94e6e7bba804d301021e03826e319fecb8dc1b..be4fa754c65cf365037858fe37dce2e0db37f77e 100644 (file)
--- a/perl/lib/Mail/Rspamd/Client.pm
+++ b/perl/lib/Mail/Rspamd/Client.pm
@@ -123,8 +123,8 @@ sub make_ssl_socket {
        my ($host, $port) = @_; 
        
        eval {
-               use IO::Socket::SSL;
-       } or $self->{error} = "IO::Socket::SSL required for imaps";
+               require IO::Socket::SSL;
+       } or$self->{error} = "IO::Socket::SSL required for imaps";
 
        return IO::Socket::SSL->new("$host:$port");
 }
@@ -1196,7 +1196,7 @@ sub process_imap {
 
        if (!$password) {
                eval {
-                       use Term::ReadKey;
+                       require Term::ReadKey;
                        $self->{error} = "Enter IMAP password: ";
                        ReadMode 'noecho';
                        $password = ReadLine 0;