[perl #127422] Behavior of state vars in variations of `do while` inconsistent

[Brian S. Julin via RT]

See also #117975 which might be related.