my %hash = ( a => 1, b => 2,c => 3, d =>4);
my @list = @hash{'a','b','d'}; 
print @list;