Perl 5.8 compat