[perl #77108] my $x = 1 // *; assigns Whatever code

[via RT]

# New Ticket Created by  Paweł Pabian 
# Please include the string:  [perl #77108]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=77108 >


[15:38] <bbkr> rakudo: my $x = 1 // *; $x.WHAT.say
[15:38] <p6eval> rakudo c1e19a: OUTPUT«WhateverCode()␤»


"1" is expected because it's first defined value in assignment.