s/$/#appleTTTTTT*/
s/T/****/g
:
h
s/.*#//p
g
/^0*#/Q
y/0123456789/9012345678/
x
G
s/[1-9]0*#.*\(.\)\n.*\([0-8]9*#\)/\2\1/
s/.$//
b