Unbreak with recent version of Perl
PR: 227856 Submitted by: romain Approved by: Matthias Apitz <guru@unixarea.de> (maintainer)