[Cascavel-pm] Duvida ao ler arquivo
Alceu R. de Freitas Jr.
glasswalk3r em yahoo.com.br
Terça Abril 25 07:30:34 PDT 2006
--- Solli Moreira Honorio <shonorio em terra.com.br>
escreveu:
> hummmm, aproveitando que o senhor está melhor
> hoje... quero tirar uma dúvida no teu código.
> >
> > FILE: while ($arquivo = <*.TXT>)
> > {
> > ....
> > LINE: while ( $linha= )
> > {
> > # para pular uma linha, baseado numa
> condição:
> > next LINE if $condicao;
> > # para pular de arquivo, baseado em outra
> condição:
> > next FILE if $outra_condicao;
> > }
> > }
> >
> O "Best Practice Perl" recomenda a utilização destes
> marcadores 'nome:' para melhorar a leitura do
> código, mas aí eu fiquei pensando se isto não seria
> um problema também, se é que melhora a leitura do
> código. Afinal, desda maneira eu posso fazer uma
> função migrar o fluxo para outra função de maneira
> abrutalhado (também conhecido de maneira "champs" :)
> ).
O uso de marcadores é particularmente útil para
simular a função case existente em outras linguagens
de programação. Assim:
MARCADOR: {
if ($condicao eq 'um') {
# faz alguma coisa
last MARCADOR;
}
if ($condicao eq 'dois') {
# faz alguma coisa
last MARCADOR;
}
}
Mais elegante que usar um monte de if-then-else
aninhados.
[]'s
Alceu Rodrigues de Freitas Junior
--------------------------------------
glasswalk3r em yahoo.com.br
http://www.imortais.cjb.net
-----------------------------------------------------------------------
A well-used door needs no oil on its hinges.
A swift-flowing stream does not grow stagnant.
Neither sound nor thoughts can travel through a vacuum.
Software rots if not used.
These are great mysteries -- The Tao Of Programming, 5.1
_______________________________________________________
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com
Mais detalhes sobre a lista de discussão Cascavel-pm