greg@sparky:~/test$ cat enlil2
#!/usr/bin/perl
use Data::Dumper;
use strict;
use warnings;

my @array = \(1 .. 3, 5 ..9);
my @array2 = \(1,2,3,5,6,7,8,9);
my @array3 = (\(1 ..3),\(5,6,7,8,9));

print Dumper \@array,\@array2,\@array3;
greg@sparky:~/test$ ./enlil2
$VAR1 = [
          [
            1,
            2,
            3
          ],
          [
            5,
            6,
            7,
            8,
            9
          ]
        ];
$VAR2 = [
          \1,
          \2,
          \3,
          \5,
          \6,
          \7,
          \8,
          \9
        ];
$VAR3 = [
          [
            1,
            2,
            3
          ],
          \5,
          \6,
          \7,
          \8,
          \9
        ];