[perl #130505] [LTA] double SORRY (BEGIN (1, 2)[*-1])

[via RT]

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


Code:
BEGIN (1, 2)[*-1]

Result:
===SORRY!=== Error while compiling <tmp>
An exception occurred while evaluating a BEGIN
at <tmp>:1
Exception details:
  ===SORRY!=== Error while compiling 
  Cannot invoke this object (REPR: Null; VMNull)
  at :


Once is enough, especially given that it says “at : ” which is not useful.