Red Hat 网络 API 连接

Question

我正在创建一个连接到 RHN 的 perl 脚本，但我似乎很挣扎。

我的代码是这样的：

#!/usr/bin/perl
use Frontier::Client;

my $HOST = 'xmlrpc.rhn.redhat.com';

my $client = new Frontier::Client(url => "https://$HOST/rpc/api", debug=>1);
my $ver = $client->call('api->getVersion');
print "$ver\n";

这应该只是连接到 RHN 并获取 API 的版本。但它返回以下内容：

---- request ----
<?xml version="1.0"?>
<methodCall>
<methodName>api->getVersion</methodName>
<params>
</params>
</methodCall>    
500 Connect failed: connect: Connection timed out; Connection timed out

我推测这是 HTTP 500，所以我能连接到服务器吗？

我无法 ping 主机，但可以解决它。我可以使用 rhnreg_ks 访问 RHN，所以我不确定出了什么问题 :/ 该脚本稍后会执行更多操作，目前更多是 PoC，效果不太好！