repeat line input""s$:?s$
?s$until(""=s$)