@x = sub { 0; for (4,3,2) { 1 } }->(); #### @x = sub { }->(); #### $x = sub { 0; for (4,3,2) { 1 } }->();