updated perlTest.pl