Stuff

# Command line argument handling
my $hidden_neurons     = '3'; #Number of neurons in the hidden layer
my $training_image     = ''; #Image to train ANN with.
my $training_epochs    = '10'; #Default to 10 training epochs
my $training_error     = '0.001'; #Default accepted error
my $training_reporting = '10'; #Default reporting interval
my $testing_image      = ''; #Image to run through the ANN with
 
GetOptions(
    'hidden-neurons|n-h:i'  => \$hidden_neurons,
    'train-image|t-i=s'     => \$training_image,
    'train-epochs|t-e:i'    => \$training_epochs,
    'train-error|t-er:i'    => \$training_error,
    'train-reporting|t-r:i' => \$training_reprting,
    'test-image|o-i=s'      => \$testing_image,
);