line-mode
w( "g" "lf" )
swap
read-num
"o"
times #(list)
join