Select Code to Download

    
use strict;
use warnings;
...
  [1,2,3] => sub { print "bla" ; next},
  3       => sub { print "bla2" }
  for (3);

Exiting subroutine via next at d:/Users/RolfLangsdorf/pm/switch.pl lin
+e 18 (#1)
    (W exiting) You are exiting a subroutine by unconventional means, 
+such
    as a goto, or a loop control statement.