#!perl -p @_=/./g;$_=(@_-8-map/(.).*\1/,/(?=(.........))/g)?Yes:No