backwards compatible to Perl 5.8.8