$ perl -e 'use Data::Dumper;{my @a=(0..10);$b=\@a} print Dumper $b'
$VAR1 = [
          0,
          1,
          2,
          3,
          4,
          5,
          6,
          7,
          8,
          9,
          10
        ];