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