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