/run for i=1,C_PetBattles.GetNumPets(2) do SELECTED_CHAT_FRAME:AddMessage(C_PetBattles.GetName(2,i).." - ".._G["BATTLE_PET_BREED_QUALITY"..C_PetBattles.GetBreedQuality(2,i)]) end
Just copy/paste this into your chat log when fighting a group of pets and it will tell you the rarity of each pet you're fighting. If you are looking to cherry pick rares you can just forfiet when there is nothing there worth it.