oder so ...

push @temp, $hash{$_} foreach @array;

the_sub (\@temp);