How to apply Cases on multiple parts of sublists?

Cases[{__?PrimeQ}] @ sol

{{2063, 853}, {2069, 857}}

Cases[sol, {_?PrimeQ, _?PrimeQ}]

(*   {{2063, 853}, {2069, 857}}   *)