[perl #57226] The statement '.say while =$*IN' makes parrot segfault

[Patrick R. Michaud via RT]

This has to do with 'while' not being recognized as a <stdstopper> in
Rakudo yet.  See #57352.

Pm