fix tests on perl 5.8