IO::Socket::SSL エラー "Bad address"

フレッツ光プレミアムからフレッツ光ネクストに変更してからか、windows updateしてからか、 Mail::IMAPClient でgmailに接続できなくなった。

my $socket = IO::Socket::SSL->new(
                                  PeerHost => 'imap.gmail.com',
                                  PeerPort => 993,
                                 ) or die "socket(): $@";

で "socket(): Bad address at ... line 31." のエラー。

use IO::Socket::SSL 'inet4';

で解決。

参考ページ
How to connect to a Gmail inbox
Perl IO::Socket::SSL: connect: Network is unreachable