<% if ($privilege eq 'guest') { %> <% foreach my $t ( qw/customer observer /) { %> <%= &subs::format_name($t) %> <% } %> <% } %> <% if ($privilege eq 'citizen' || $privilege eq 'resident') { %> <% foreach my $t ( @{$gb::master_plan} ) { %> {'team'} eq $team) { %>selected<% } %>><%= &subs::format_name($t->{'team'}) %> <% } %> <% } %> <% if ($team && $privilege eq 'citizen' || $privilege eq 'resident') { %> <% my @t = grep { $_->{'team'} eq $team } @{$gb::master_plan}; %> <% if (scalar @t > 0) { %> <% foreach my $cl ( @{$t[0]->{'clubs'}} ) { %> <% if ($cl->{'team'}) { %> {'team'} eq $club) { %>selected<% } %>><%= &subs::format_name($cl->{'team'}) %> <% } %> <% } %> <% } %> <% } %> <% if ($community) { %> <% } %>