(uiop:run-program '("ls" "-l" "-a") :output :string)