[Cascavel-pm] linguagem perl+ms-dos

[Thomas Britis]

Oi,

	Antes de mais nada, há algo errado no programa:

	Ao inves de while ($linha = <A>) o correto é: while ($linha = <F>);

	O que é feito ali é um looping (while()) apontando a variavel $linha 
para o filehandle retornado pelo open(). while ($linha = <F>).

	Desculpe a falha.

	
fabio nery wrote:
> Ola Thomas,
>  
> Onde vc ta lendo a linha do arquivo e inserindo na variavel $linha, 
> preciso pegar cada linha do arquivo aberto e colocar na variavel, no 
> pascal tem a funçao Readln(F,linha), neste codigo que me passou onde 
> isto é feito e o qual o significado do parametro <A>?
>  
> Valeu,
>  
> Fabio
> 

-- 
Thomas Storino Britis
TCNet Informatica e Telecomunicacoes LTDA