perl 连接到活动服务器Infoblox

jv4diomz 于 2023-08-06 发布在 Perl

关注(0)|答案(1)|浏览(167)

我是一个初学者，我必须采取一个解决方案使用两个Infoblox盒。
目前，一个服务器是主动的（主）服务器，另一个是被动的。如果第一个失败，第二个接管。我使用Perl API，我如何知道当我尝试连接到一个服务器，它是主动服务器还是被动服务器？
我只会连接到活动服务器，
我已经考虑过Infoblox::Grid::Member的方法active_position()，但我不知道如何使用它。

use strict;
use Infoblox;

my $grid_member = Infoblox::Grid::Member->new(gateway=> "xxx.xxx.xxx.xxx",ipv4addr=> "xxx.xxx.xxx.xxx",mask=> "xxx.xxx.xxx.xxx", name=> "ibiza.mydomain.com");
print  'grid : '. $grid_member . "\n";

my $active_server = $grid_member->active_position();
print  $active_server . "\n";

exit;

字符串
这返回：

grid : Infoblox::Grid::Member=HASH(0xf10ca8)
0

型
这个“0”是什么？

perl

来源：https://stackoverflow.com/questions/26136099/connection-to-the-active-server-infoblox

1条答案

按热度按时间

utugiqy61#

如果您的GridMaster是一个HA对，那么您就不需要担心连接到哪一个。您只需连接到HA对的VIP（虚拟IP），该IP地址始终相同。
会话测试代码示例：

#!/usr/bin/perl

use strict;
use Infoblox;

# Create a session to the Infoblox appliance
my $SESSION = Infoblox::Session->new(
    master  => "192.168.1.2",
    username => "admin",
    password => "***"
);

if ($SESSION->status_code()) {
    my $result = $SESSION->status_code();
    my $response = $SESSION->status_detail();
    print "Error: $response ($result)\n";
} else {
    print "Connection established\n";
    print "Server Version: ".$SESSION->server_version()."\n";
}

字符串
检查您的设备https://appianceip/api/doc上的API文档，API文档中嵌入了大量示例。
史蒂夫

赞(0）回复(0）举报 2023-08-06

我来回答

perl 连接到活动服务器Infoblox

1条答案

相关问题

热门标签

最新问答