Select Code to Download

    while (my($gid,$gname) = each %groups) {
        if ($debug >= 3) { writeLog("I","Check notification group $gna
+me");}
...
            }
        }
    }

my $thost = $ENV{mc_host};
my $source = $ENV{source};
my $server_hndl = $ENV{server_handle};