http://qs321.pair.com?node_id=343978


in reply to Retrieve unix group membership for a uid in a perl CGI

This works for me: 
my $grp = getgrgid((getpwnam("user"))[3]);
print $grp;

[download]

- Tom

In Section Seekers of Perl Wisdom