use Data::Dumper; print Dumper $net->infer([1,1]); $VAR1 = [ '0.00993729281477686', '0.990100297418451' ];