#!perl -p
$$=(length$_)-9;$_=($$>=0&&$$-map/(.).*\1/,/(?=(.........))/g)?Yes:No