dup
    is-lower
    5
    shift-left
    -
    itemize
m6
unwords
@0
unlines
tail