Help for this page

Select Code to Download

Select or download this

sub new {
  my $class = shift;
...
  bless $self, $class;
  $self->init();
}