my $lc = List::Compare->new( @hash{ sort keys %hash } );