Abrir Arquivo Texto E Le-lo Linha Por Linha

[rockbilly]

Olá todos,

Tenho este script abaixo:

open(arq,'D:\texto2.txt') or die('Falha ao abrir ARQUIVO!'); 
@line = split(/\n/,<arq>); 
$t = @line; 
$i = 0;
 while ($i < $t)
 { 
   print @line[$i]; 
   $i++;
  }
close(arq);

o arquivo texto2.txt é:

teste

um

dois

quatro

etc.

O problema é que q não estou conseguindo quebrar o texto com a função SPLIT as quebras de linha "\n" como colocado la no código acima. O que estou fazendo de errado, pois o script só lê a 1ª linha?????

Obrigado a qualquer ajuda!

[Super_Zica_Man]

cara quase ninguém manaja muito ou responde muito aqui no forum de CGI eu o aconselho a partir para uma outra linguagem dinamica com ASP ou PHP eu axo mais facil pelo menos...

[jgcl]

respondendo pela terceira vez (espero que não apaguem denovo).

Se você está utilizando while, não precisa armazenar o conteúdo em um array.

faça isso:

while(<arquivo>) { }

ao ivés de @array = <arquivo>;

segue o exemplo prático:

open(arq,'D:\texto2.txt') or die('Falha ao abrir ARQUIVO!');

while ($teste = <arq>) {

++$n;

print "linha $n, conteúdo: $teste\n";

}

close(arq);

falou