\r\n my $currentgroupmembers = [];\r\n if (!LocalGroupGetMembers($pdc, $currentgroup, $currentgroupmembers)) {\r\n print "$^E\\n"; # print error code\r\n }\r\n $groups{$currentgroup} = $currentgroupmembers;\r\n\r\nor\r\n
\r\n $groups{$currentgroup} = \\@currentgroupmembers;\r\n\r\nAn incidental style nit. I find that long names like that become clearer if you put _ between the words. So currentgroupmembers becomes current_group_members.
\r\n\r\nCheers,
\r\nBen