my %temp = map { $_ => (split(/=/, $_, 2))[0] } @id;
@id = sort { $lid->{$temp{$a}} cmp $lid->{$temp{$b}} } @id;