愛島発電所

QT SOLAR 愛島発電所

本日の発電量
97 kWh
現在の日射量
92 Wh/㎡
現在の外気温
16.4 ℃

(2025/05/22 08:29 更新)

下増田発電所

QT SOLAR 下増田発電所

本日の発電量
17 kWh
現在の日射量
212.3 Wh/㎡
現在の外気温
17.3 ℃

(2025/05/22 08:18 更新)

北原東発電所

QT SOLAR 北原東発電所

本日の発電量
33 kWh
現在の日射量
260 Wh/㎡
現在の外気温
16.6 ℃

(2025/05/22 08:20 更新)

長久良辺発電所

QT SOLAR 長久良辺発電所

本日の発電量
22 kWh
現在の日射量
154 Wh/㎡
現在の外気温
18.6 ℃

(2025/05/22 08:09 更新)

白坂発電所

QT SOLAR 白坂発電所

本日の発電量
19 kWh
現在の日射量
121 Wh/㎡
現在の外気温
19.5 ℃

(2025/05/22 08:19 更新)

清水沢発電所

QT SOLAR 清水沢発電所

本日の発電量
14 kWh
現在の日射量
137 Wh/㎡
現在の外気温
16.2 ℃

(2025/05/22 08:09 更新)

SSL証明書なしにHTTPS通信を行う | Perlで作るサーバーサービス

SSLサーバー証明書(SSL証明書)なしにIO::Socket::SSLを用いたHTTP通信を行います。

IO::Socket::SSLを用いたHTTP通信では、通常、SSLサーバー証明書(SSL証明書)なしにHTTPS通信を行うことは出来ません。

例えばこんな感じのエラーが出ます。

SSL connect attempt failed error:1416F086:SSL routines:tls_process_server_certificate:certificate verify failed

証明書なしではSSLの意味がないのでそれはそれで良いのですが、LAN上のWEBサーバーであったり、一時的にであったり、証明書なしで接続したいと思うこともあるわけです。

その場合、IO::Socket::SSLのインスタンス生成時のオプションでverifyを行わないよう指定します。

では、具体的な話。

この記事に次の行があります。

$socket = IO::Socket::SSL->new(PeerAddr => $host, PeerPort => $port) || die "$! $host:$port";

これを以下のように変更します。

$socket = IO::Socket::SSL->new(PeerAddr => $host, PeerPort => $port, SSL_verify_mode => 0) || die "$! $host:$port";

これでverifyが行われなくなるため、SSL証明書がなくともエラーとなりません。