[perl #132217] [UNI] `unival` ignores everything but first chars

[via RT]

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


Perhaps it should throw when it was given trailing stuff after the relevant 
char?

00:49   dpk     m: say unival("1\x[300]23")
00:49   camelia rakudo-moar 98fae3: OUTPUT: «1␤»
00:50   dpk     that … seems like a potential security issue for some apps
00:51           m: say unival("1\x[300]dasdsadsadsadsadasdsa")
00:51   camelia rakudo-moar 98fae3: OUTPUT: «1␤»