A simple neural network in Perl