my $net = new AI::NeuralNet::BackProp(3,6,1);