perl 5.8 support