Converting my comments into an answer:
to split your
list
:splitList = Split[list, Last[#2] >= Last[#1] &]
or
splitList = Split[list, First[#2] > First[#1] &]
to then select only those sublists with at least three elements:
Select[splitList, Length[#] >= 3 &]