:
s/\(.\)\(.*\)/\2\1\n&/m
/^\(\([^\n]*\)\n.*\)\2$/!b
s//\1/