print$_,($d="$d$_"%7)?'':$/for<>=~/./g