[Moscow.pm] AnyEvent::HTTP и TLS

[TheAthlete]

Здравствуйте!
При запуске вот такого кода:

#!/usr/bin/perl -w
use strict;

use utf8;
use feature 'say';

use AnyEvent;
use EV;
use AnyEvent::HTTP;

my $cv = AnyEvent->condvar;

http_get 'https://metacpan.org/module/AnyEvent::HTTP', sub {
   my ($body, $hdr) = @_;

   if ($hdr->{Status} =~ /^2/) {
     say 'Yes';
   } else {
     say "error, $hdr->{Status} $hdr->{Reason}";
   }
   $cv->send;

};

$cv->recv;

выдается следующая ошибка:

Yes
         (in cleanup) Can't call method "_put_session" on an undefined  
value at /usr/local/lib64/perl5/AnyEvent/Handle.pm line 2163 during global  
destruction.

Подскажите пожайлуста, в чем может быть проблема?