@id = sort { $lid->{split(/=/, $a)} cmp $lid->{split(/=/, $b)} } @id;