$ perl -E 'X(); sub X { for (0..2) { last if $_ > 1; say; } say 42; }' 0 1 42 #### $ perl -E 'X(); sub X { for (0..2) { return if $_ > 1; say; } say 42; }' 0 1