fix thing incompatible with Perl < 5.10