for(<>){/ (\S) /;$a=$`;(print$a++x$')for$`..$1;print"\n"}