Update test.pl

Please do the needfull