#!/usr/bin/perl -w
use strict;

my ($name,$passwd,$gid,$members) = getgrnam("www");
print "Name: ", $name, "\n";
print "GID: ", $gid, "\n";