Select Code to Download

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

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

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

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