RT#119897 fixed also for Perl 5.18.2