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