test on perl 5.18