sub merge { my %hash; @hash{ @_ } = @_; @hash{ sort keys %hash }; }