[perl #126535] [BUG] - FIRST phaser not firing in while loop

[via RT]

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


No gist for this, simple:

17:29 < zengargoyle> m: my $x = True; while $x { FIRST { say "first"
}; LAST { say "last" }; $x = False; }
17:29 <+camelia> rakudo-moar 1051fc: OUTPUT«last␤»

FIRST phaser does not fire in a while loop.

17:29 < zengargoyle> m: my $x = True; while $x { once { say "first" };
LAST { say "last" }; $x = False; }
17:29 <+camelia> rakudo-moar 1051fc: OUTPUT«first␤last␤»

once does work though.