I get a segmentation fault error when I run this on code containing
Switch (big surprise, right?):
$ 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-li
+nux
etc...
$
Strangely, I don't see a core dump file. If I comment out the use Data::Dumper; line, or if I move that line above the use Switch; line, I don't see the segfault error. It looks like if the Switch line is last, we get no errors.
I realize Switch is strongly discouraged, and I will attempt to convince the original code author to get rid of it.