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