buffer.lua

a = {
    "Lorem ipsum dolor sit amet, consectetur adipiscing elit",
    "Aliquam euismod mi blandit orci dictum, vel pulvinar ligula hendrerit",
    "Vestibulum vel ipsum sit amet est feugiat cursus",
    "Vivamus viverra augue nec magna aliquam, aliquet mollis lacus aliquam",
    "Proin fringilla sapien eu ullamcorper scelerisque",
    "Lorem ipsum dolor sit amet, consectetur adipiscing elit",
    "Aliquam euismod mi blandit orci dictum, vel pulvinar ligula hendrerit",
    "Vestibulum vel ipsum sit amet est feugiat cursus",
    "Vivamus viverra augue nec magna aliquam, aliquet mollis lacus aliquam",
    "Proin fringilla sapien eu ullamcorper scelerisque",
}

function print_lines(lines, max_length)
    if max_length == nil then
        max_length = 80
    end
    repeat
        local block = ""
        repeat
            token = table.remove(lines, 1)
            if token ~= nil then
                block = (block ~= "" and block..". " or "")..token
            else
                break
            end
        until string.len(block) > max_length
        print(block)
    until table.getn(lines) == 0
end

print_lines(a)