Perl 5.18 annoyance handling.