for my $frontend_id (@$frontends) {
my $frontend = query("/ipLoadbalancing/ip-$ip/frontend/$frontend_id") or exit 1;
- next unless $frontend->{defaultBackendId};
+ #next if $frontend->{defaultBackendId};
+ next if $frontend->{disabled} ne 'false';
my $farms = query("/ipLoadbalancing/ip-$ip/".$frontend->{type}."/farm") or exit 1;
for my $farm_id (@$farms) {
my $servers = query("/ipLoadbalancing/ip-$ip/".$frontend->{type}."/farm/$farm_id/server") or exit 1;
for my $id_server (@$servers) {
my $server = query("/ipLoadbalancing/ip-$ip/".$frontend->{type}."/farm/$farm_id/server/$id_server") or exit 1;
+ next if $server->{backup} or $server->{status} ne 'active';
+ #use Data::Dumper; warn Dumper($server);
+
push @routed,ip_routed($server->{address});
}