How about the attached patch? -- Karl Williamson --- via perlbug: queue: perl5 status: new https://rt.perl.org/Ticket/Display.html?id=121630