switch [1,2,3] => sub { print "bla" ; { no warnings 'exiting'; next } }, 3 => sub { print "bla2" } for (3);