$ cat foo.pl #!/usr/bin/env perl use warnings; use strict; use Switch; use Data::Dumper; my $val = 7; switch ($val) { case 1 { print "number 1" } case [5..10,42] { print "number in list" } else { print "previous case not true" } } print "\n"; $ $ exports foo.pl foo.pl: Segmentation fault (core dumped) $ $ perl -v This is perl 5, version 22, subversion 0 (v5.22.0) built for x86_64-linux etc... $