<br><br><div class="gmail_quote">2009/10/16 Alexei Znamensky <span dir="ltr"><<a href="mailto:russoz@gmail.com">russoz@gmail.com</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Alguém me corrija se eu estiver errado, mas:<br><br>2009/10/15 Daniel de Oliveira Mantovani <span dir="ltr"><<a href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">daniel.oliveira.mantovani@gmail.com</a>></span><br>
<div class="gmail_quote"><div class="im">
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Você não precisa atribuir a um vetor, você pode fazer algo como:<br><br>#!/usr/bin/perl<br>
<br>
use strict;<br>use warnings;<br><br>open my $file,'<','arquivo.txt' or die $!;<br><br>foreach my $linha ( <$file> ) {<br></blockquote></div><div><br>Mantovani,<br><br>O fato de o foreach esperar, respectivamente, um scalar (neste caso my $file) e um array (neste caso <$file>), não faz com que o file-handle $file seja interpolado como um array e, efetivamente você tenha o mesmo efeito de atribuir o conteúdo do arquivo a um vetor?<br>
</div></div></blockquote><div><br>Você tem razão, o foreach repete o laço para cada item e nesse caso ele teria que ler o file-handle para saber quantos itens são, o while faz o que faz enquanto a condição for verdadeira, seria uma opção mais sábia usar while.<br>
<br>maluco++<br>edem++ <br></div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div class="gmail_quote"><div>
</div><div class="im"><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div class="gmail_quote"><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><div></div><div><div><div style="font-family: times new roman,new york,times,serif; font-size: 10pt;"><div>Seja livre, tenha Jesus no coração e Linux no PC.</div></div></div></div></div></blockquote></div>
</blockquote></div><div><br>Muito bonito isso, mas o seu cross-posting foi feio bagaray. Só faltou colocar a lista de perl do Rio, aí sim, você ia ter certeza que não ia ter praticamente ninguém da comunidade Perl no Brasil que não estivesse prestando atenção ao seu problema (que é bem básico, por sinal, se você tivesse lido o manual antes não precisaria nem perguntar).<br>
</div></div><br>-- <br>Alexei Znamensky [russoz_gmail_com] [<a href="http://russoz.wordpress.com" target="_blank">russoz.wordpress.com</a>] [<a href="http://www.flickr.com/photos/alexeiz" target="_blank">www.flickr.com/photos/alexeiz</a>]<br>
"Though we live in trying times, we're the ones who have to try"<br>
<br>_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>Não sentimos nosso próprio cheiro, por isso use espelhos.<br>
O passo só é importante, quando não se aprende com os erros.<br>