Windows Strawberry Perl调用Pushover API报Invalid Argument错误

业务背景 #

内部监控系统检测到异常时，会自动组装告警内容，调用自定义Perl脚本通过Pushover开放接口向服务台推送通知，整套流程此前长期运行正常，昨日起服务台完全收不到告警消息。
脚本核心逻辑为接收传入的应用token、用户密钥、告警内容、消息优先级参数，通过LWP::UserAgent向Pushover接口发送POST请求。

已观测到的异常现象 #

• 手动传入测试参数执行脚本时，脚本异常终止并输出报错：500 can't connect to api.pushover.net:443 <invalid argument>
• 防火墙侧已为Pushover对应的2个IP开放443端口访问权限，将脚本中的请求域名替换为对应IP后，报错变更为：500 can't connect to api.pushover.net:443 <Bad File Descriptor>
• 本地未调整过任何消息发送相关的配置逻辑，联系Pushover官方支持未获得有效协助。

对应连接报错的常见根因 #

针对Strawberry Perl环境下LWP::UserAgent抛出的两类连接错误，常见触发原因如下：

• <invalid argument> 类连接错误
  • 环境内安装的IO::Socket::SSL、Net::SSLeay组件版本过旧，无法兼容Pushover侧升级后的TLS协议要求，Windows套接字初始化阶段传入了系统不支持的参数，直接触发参数非法错误
  • 脚本中硬编码修改PATH环境变量的逻辑，导致LWP组件加载动态链接库时，优先匹配到了系统路径下版本不匹配的OpenSSL库，和Perl自带的依赖库产生冲突
• 直连IP后出现的<Bad File Descriptor>类错误
  • 直连IP发送HTTPS请求时未携带正确的SNI（服务器名称指示）参数，Pushover侧会直接拒绝对应的TLS握手请求，本地套接字被系统回收后，后续的读写操作就会触发无效文件描述符报错
  • 防火墙/链路中间设备拦截了直连IP的TLS握手包，未完成正常TCP连接就提前关闭了本地套接字

可落地的修复操作建议 #

• 优先升级Perl环境内的网络请求与TLS依赖组件，在Strawberry Perl的命令行环境中执行：

  cpanm --upgrade LWP::UserAgent IO::Socket::SSL Net::SSLeay
  

  升级完成后先执行简单的HTTPS请求测试，确认到Pushover的连通性恢复正常
• 删除脚本中硬编码拼接PATH环境变量的逻辑：原脚本中追加;Perl_Path的硬编码配置属于无效修改，会干扰Perl对自身配套依赖库的正常加载路径
• 不要在生产脚本中硬编码Pushover的IP地址，Pushover的服务IP会动态调整，且直连IP会因为缺失SNI参数被服务端拒绝，域名解析是长期稳定的正确请求方式
• 如果升级依赖后仍存在兼容性问题，可在初始化LWP::UserAgent时显式指定兼容的TLS配置，避免默认版本协商不匹配的问题：

  my $ua = LWP::UserAgent->new(
      timeout => 10,
      ssl_opts => {
          SSL_version => 'tls_v12:tls_v13',
          SSL_verify_mode => SSL_VERIFY_PEER
      }
  );
  

内容的提问来源于stack exchange，提问作者RhoGu