 |
|
|
|
Você está aqui: LISP ::: Dicas & Truques ::: Arquivos e Diretórios |
Como ler um arquivo uma linha de cada vez em LISP usando a função open() e o laço loop forQuantidade de visualizações: 649 vezes |
|
Nesta dica mostrarei como podemos ler um arquivo texto em LISP uma linha de cada vez. O mesmo procedimento pode ser feito em AutoLISP, a implementação LISP para o AutoCAD. Note que abri o arquivo usando a função open() e a condição :if-does-not-exist, que retorna nil se o arquivo não existir. Se o arquivo existir e for aberto com sucesso, nós entramos na condição when e percorremos cada linha do arquivo usando o laço loop for em combinação com a função read-line(). Para finalizar nós usamos while e format para exibir o conteúdo de cada linha lida. Veja o código LISP completo para o exemplo: ----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------
; Este programa LISP mostra como ler o conteúdo
; de um arquivo txt uma linha de cada vez
(let ((arquivo (open "C:\\estudos_java\\alunos.txt"
:if-does-not-exist nil)))
; o arquivo foi aberto com sucesso?
(when arquivo
; percorremos uma linha de cada vez
(loop for linha = (read-line arquivo nil)
while linha do
; mostramos o conteúdo da linha lida
(format t "~a~%" linha)
)
; fechamos o arquivo
(close arquivo)
)
)
Ao executar este código LISP nós teremos algo parecido com: Alberto Maria Fernanda Josias |
 Link para compartilhar na Internet ou com seus amigos: |
Veja mais Dicas e truques de LISP |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
