Hi,
Your expression pertB contains
epsilonmet[i, j, k] covD[-j][epsilonmet[k, l, m] xi[-l] B[-m] ]
which has a repeated k index. Change one to -k.
Note the message was ""Found indices with the same name k$6529"". That was an indication that the problem was with a k index.
Cheers,
Jose.