heh as soon as I saw the ternary expression I recalled the bug report I submitted some years ago:

https://rt-archive.perl.org/perl5/Ticket/Display.html?id=130...