my $object = bless $self, $class;
  return $object;