H:\>perl -e"%a=( 1..10, 11..20 );print keys %a"
137159117319115

##</code><code>##

H:\>perl -e"%a=( 1..10, 11..20 );print qq{@{[keys %a]}}"
13 7 15 9 1 17 3 19 11 5

##</code><code>##

perl -MData::Dumper -e "%a= 1 .. 10, 2 .. 11 ;print Dumper \%a"

##</code><code>##

H:\>perl -MData::Dumper -e "%a= 1 .. 10, 2 .. 11 ;print Dumper \%a"
$VAR1 = {
          '7' => 8,
          '9' => 10,
          '1' => 2,
          '3' => 4,
          '5' => 6
        };