Select Code to Download

my @numbers                 =
                            (
...
                         foreach
                      ( @numbers )
            { print scalar @$_; print "\n"; }

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