use Hash::Ordered; use MCE::Shared::Ordhash; tie my %h1, 'Hash::Ordered', @pairs; tie my %h2, 'MCE::Shared::Ordhash', @pairs; my $h3 = Hash::Ordered->new( @pairs ); my $h4 = MCE::Shared::Ordhash->new( @pairs );