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