$ perl -e 'use Data::Dumper;{my @a=(0..10);local $b=\@a} print Dumper $b'
$VAR1 = undef;