package GroupSystem;
sub new {
   my $class  = shift;
   my $self = [{}];

##</code><code>##

package GroupSystem;

use Class::PseudoHash;
@GroupSystem::ISA = 'Class::PseudoHash';