Try a hash slice:

my @value_table = @hash{ @keys };
[download]

Slices are discussed in perldata. Conveniently, slices preserve key order.

If you're collecting all the values held in the hash, and don't care about order, just invoke values.

my @value_table = values %hash;
[download]