[Cascavel-pm] linguagem perl+ms-dos

[Fernando]

perl -ne 'system("c:\windows\system32\prnmngr.vbs -ac -p $_")' arquivo




Thomas Britis escreveu:
> 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
>>
>>     
>
>