adaptions for perl-5.10