getgrnam, in scalar context, returns the group ID of the named group:

my $gid = getgrnam("users");
[download]

Now you can use the chown function.

perldoc -f getgrnam gives more detailed information about getgrnam (and its sibling functions).

Arjen