@keys = qw( foo bar baz );
@copy{ @keys } = @orig{ @keys };