Make the perl test a real one