@a = sort keys %{{a=>1,b=>2,c=>3}}; #### @a = sort keys %{{ map {$_ => undef} map {split} <> }};