perl 5.10.0-24ubuntu4 crashes with SIGSEGV

Binary package hint: perl

Ubuntu karmic on amd64
perl 5.10.0-24ubuntu4

This program causes perl to crash:

#!/usr/bin/perl
my $xxx;
for my $_ ([]) {
 $xxx = sub {
  my @arr = ([]);
  0 for @arr;
  0 for @arr;
 };
}
&$xxx();