map{--$=until/(?=(.{$=})).+\1/;$=.=print$1.$/}<>