tie my %h, 'Tie::StdHash';
%h = (a => 1, b => 2, c => 3);
tie my %h, 'Tie::StdHash';
%h = (a => 1, b => 2, c => 3);
is_deeply [ sort { $a <=> $b } @v ], [ 1, 3 ], 'copy: tied hash values correctly';
is_deeply [ sort { $a <=> $b } @v ], [ 1, 3 ], 'copy: tied hash values correctly';