main=interact$unlines.scanl1(#).lines\x0d (a:b)#(c:d)=last(c:[a|c<'!']):b#d\x0d a#b=a++b
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page