Select Code to Download

use strict "object"

my $obj= new Neural::Net( "adaptive" );

package Widget;
use WingNut;
...
    my $self= shift( @_ );
    $self->{SubObj}= new WingNut(@_); # oops!!
}