Removed lexical $_ from test_program

See http://perldoc.perl.org/perlvar.html#General-Variables - specifically, the last paragraph before @ARG