Advertisement
cwchen

[Perl 6] last with label demo.

Oct 5th, 2017
516
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 6 0.09 KB | None | 0 0
  1. OUTAHERE: while True  {
  2.     for 1,2,3 -> $n {
  3.         last OUTAHERE if $n == 2;
  4.     }
  5. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement