line-mode
";"
split
dup
length
dec
{
    left-uncons
    left-uncons
    itemize
    rot
    unwords
    swap
    split
    swap
    tail
    join
    words
}
times #(eval)