{for(;$1;$1&&s=s$1--RS)print$1--}$0=s