sub new{ my $self = shift; my $foo = shift; $self->{'foo'} = $foo; return bless( {}, ( ref($self) || $self ) ); } #### $self = bless( {}, ( ref($self) || $self ) ); $self->{'foo'} = $foo; return $self;