my %cookie_hash = $IN->{cookies};

	foreach my $group (keys %cookie_hash) {
	    print "The members of $group are\n";
	    foreach (@{$cookie_hash{$group}}) {
	        print "\t$_\n";
	    }
	}