Help for this page

Select Code to Download


  1. or download this
    sub new{
      my $self = shift;
      my $foo  = shift;
      $self->{'foo'} = $foo;
      return bless( {}, ( ref($self) || $self ) );
    }
    
  2. or download this
      $self = bless( {}, ( ref($self) || $self ) );
      $self->{'foo'} = $foo;
      return $self;