my @keys = ('one', 'two', 'three');
for (@keys) {
    print OUT $hash{$_};
}