Help for this page

Select Code to Download


  1. or download this
    package GroupSystem;
sub new {
   my $class  = shift;
   my $self = [{}];
  2. or download this
    package GroupSystem;

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