sub _GROUPS { my ( $this, $params ) = @_; my @groupNames = map { '| [['.$_->webDotWikiName(). ']['.$_->wikiName().']] |'. join(', ', map { '[['.$_->webDotWikiName().']['.$_->wikiName().']]' } @{$_->groupMembers()}). ' |'; } sort {$a->wikiName() cmp $b->wikiName()} @{$this->{users}->getAllGroups()}; return '| *Group* | *Members* |'."\n".join("\n", @groupNames); }