/(.)*\1/,/[^$1]/,print"@+ $&"for<>