Perl Brasil

Pesquisar

Documentação

Artigos

Planeta

Eventos

Comunidade

r1 - 06 Aug 2006 - JoenioCosta

Como ler um arquivo por parágrafos

Problema

Você quer ler um arquivo por parágrafos ("\n\n") ao invés de linhas.

Solução

Redefina $/. Por exemplo: 

   $/ = "\n\n";

Discussão

A variável $/ ($INPUT_RECORD_SEPARATOR) define o separador de linhas padrão de arquivos. Normalmente o separador é "\n" (exceto no DOS/Windows, onde é "\r\n"), mas pode ser redefinido para obter resultados interessantes.

Você pode setar $/ = "", para eliminar parágrafos em branco (como em "abc\n\n\ndef"), ou "\n\n\" para aceitar parágrafos em branco.

Observe que as linhas em branco não devem ter espaços: "foo\n \nbar" é um único parágrafo, enquanto que "foo\n\nbar" são dois.

Comentários