my $group = $groups->First
or die "No RT internal group found for Privileged users";
my ($val, $msg) = $group->PrincipalObj->GrantRight(
my $group = $groups->First
or die "No RT internal group found for Privileged users";
my ($val, $msg) = $group->PrincipalObj->GrantRight(