Help for this page
my %GROUPS => ( A => 1, ... print("$_ in group $group: $foo->{$_}\n"); } }
my %GROUPS => ( A => { ... print("$_ in group $group: $foo->{$_}\n"); } }