[perl #117889] Cannot get character of empty string

[via RT]

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


<moritz> r: '' ~~ / <:L> /
<camelia> rakudo 540c01: OUTPUT«Cannot get character of empty string␤ in
regex at /tmp/iwmzk4uA9Y:1␤ in method ACCEPTS at
src/gen/CORE.setting:10370␤ in method ACCEPTS at
src/gen/CORE.setting:683␤ in block at /tmp/iwmzk4uA9Y:1␤␤»
<moritz> it's what makes worcase() blow up