Select Code to Download

# First solution: Put coderefs in scalars and use those
my $start = sub { ... };
...
    }, ... ],
    ...
);

2;0 juerd@ouranos:~$ perl -e'undef christmas'
Segmentation fault
2;139 juerd@ouranos:~$