[perl #129037] Assertion Failure: Perl_yylex (toke.c:4890)

# New Ticket Created by  Brian Carpenter 
# Please include the string:  [perl #129037]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=129037 >


The attached script triggers an assertion failure in Perl v5.25.5 (v5.25.4-5-g92d73bf).

./perl test247
perl: toke.c:4890: int Perl_yylex(): Assertion `((((U8)((*(((U8*)s)+1 )) | 0)) & 0xC0) == 0x80)' failed.
Aborted

• [perl #129037] Assertion Failure: Perl_yylex (toke.c:4890) by Father Chrysostomos via RT
• [perl #129037] Assertion Failure: Perl_yylex (toke.c:4890) by Brian Carpenter