[Cascavel-pm] linguagem perl+ms-dos

[fabio nery]

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 Britis <thomas em tcnet.com.br> escreveu:
  open (F, "arquivo") # Onde "arquivo" é o arquivo que deve ser lido.
while ($linha = <A> ) { # Le cada linha colocando na variavel $linha
system ("$linha"); # Faz uma chamada de sistema a partir da variavel $linha
}
close (F); # Fecha o arquivo "arquivo"

fabio nery wrote:
> Ola Ivo,
> 
> E mais ou menos isso, olha o codigo em pascal :
> 
> //inicio-codigo
> Begin
> 
> Assign(file,NomeAuto);
> Reset(file); //abre o arquivo para leitura;
> While not eof(file) do begin //enquanto nao for o final do arquivo
> Readln(file,linha); //le do arquivo e desce uma linha. O conteúdo 
> lido é transferido para a variável linha
> 
> //aqui deve chamar o comando do DOS e passar o parametro linha
> //comando a ser passado ; cscript c:\windows\system32\prnmngr.vbs 
> -ac -p linha
> End;
> Closefile(f);
> End.
> 
> //fim-codigo
> 
> 
> Valeu,
> 
> Fabio
> 
> */Ivo Peixinho /* escreveu:
> 
> 
> 
> Nao sei se e' exatamente o que voce quer, mas:
> 
> open(ARQ,"/caminho/do/arquivo");
> 
> while() {
> 
> system("/caminho/comando/ms-dos $_");
> }
> 
> Ou se voce quer armazenar o resultado, voce pode trocar o system por:
> 
> @resut=`/caminho/comando/ms-dos $_`;
> 
> Ivo.
> 
> On Tue, 4 Jul 2006, fabio nery wrote:
> 
> > Ola a todos,
> >
> > Gostaria de uma ajuda do grupo com um problema que estou tendo,
> quero ler um arquivo e guardar cada linha lida em uma variavel e
> depois chamar um comando ms-dos e passar esta variavel como
> parametro para o comando ms-dos, tem como fazer isto em perl? Espero
> sinceramente que possam me ajudar.
> >
> > Obrigado a todos,
> >
> > Fabio
> >
> >
> > ---------------------------------
> > Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o
> discador agora!_______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
> 
> 
> ------------------------------------------------------------------------
> Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu 
> celular. Registre seu aparelho agora! 
> 
> 
> 
> 
> ------------------------------------------------------------------------
> 
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm

-- 
Thomas Storino Britis
TCNet Informatica e Telecomunicacoes LTDA
_______________________________________________
Cascavel-pm mailing list
Cascavel-pm em pm.org
http://mail.pm.org/mailman/listinfo/cascavel-pm


 		
---------------------------------
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060704/e2585807/attachment.html