sub is_present {
    my $cluster = shift;
    scalar grep {$_ eq "$cluster.hosts"} @{$HoL{$cluster}};
}