test with perl 5.8