Perl: Add failing decoder test that re-enters