Fix warning with perl 5.20