(Solo Perl) Restituisce un riferimento ai nomi di replica.
Perl
use CQPerlExt; my $adminSess; $adminSess = CQAdminSession::Build(); $adminSess->Logon("admin", "", "CQMS.MS_ACCESS.SITEA"); if ($adminSess->IsMultisiteActivated()) { my $replicNames; my $replicName; $replicaNames = $adminSess->GetReplicaNames(); foreach $replicaName (@$replicaNames) { printf $replicaName. "\n"; } } #... CQAdminSession::Unbuild($adminSess);