<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman,new york,times,serif;font-size:12pt">Olá Otávio;<br><br> Obraigado pela dica, mas talvez eu tenha me espressado mal. Eu já sabia imprimir um arquivo sem passá-lo para um array, mas o que preciso é de algo como:<br><br>open(FILE,@ARGV[0]);<br><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">print FILE[15]; # IMPRIMIR A DÉCIMA QUINTA LINHA DE UM ARQUIVO QUE NÃO É UM ARRAY;<br><br>um abraço;<br><br><br><div style="font-family: arial,helvetica,sans-serif; font-size: 13px;"><font size="2" face="Tahoma"><hr size="1"><b><span style="font-weight: bold;">De:</span></b> Otávio Fernandes <otaviof@gmail.com><br><b><span style="font-weight: bold;">Para:</span></b> Cascavel Perl Mongers <cascavel-pm@pm.org><br><b><span style="font-weight:
bold;">Enviadas:</span></b> Domingo, 18 de Abril de 2010 23:45:01<br><b><span style="font-weight: bold;">Assunto:</span></b> Re: [Cascavel-pm] Leiitura de arquivos<br></font><br>2010/4/18 Leonardo Gerheim <<a ymailto="mailto:general_andrade@yahoo.com.br" href="mailto:general_andrade@yahoo.com.br">general_andrade@yahoo.com.br</a>>:<br>> Olá pessoal;<br>><br>> To precisando de uma ajuda. Preciso ler um arquivo muito grande sem ter<br>> que pasá-lo para um array, até aí ok. Entretanto como faço para ter o<br>> controle de cada linha lida como em um vetor?<br>><br>> open(file,ARGV[0]);<br>> @array=(<file>); #NÃO QUERO PASSAR O ARQUIVO PARA UM ARRAY;<br>> print @array[5]; # QUERO IMPRIMIR APENAS UM LINHA DELE COMO COM O ARRAY;<br>><br>> Abraço.<br>><br>><br>> _______________________________________________<br>> Cascavel-pm mailing list<br>> <a
ymailto="mailto:Cascavel-pm@pm.org" 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><br>Leonardo,<br><br>Isso é bastante simples. Você não precisa transferir o conteúdo do arquivo<br>para um vetor, basta tratá-lo como um. Veja:<br><br>open( my $FH, '<', '/etc/passwd' )<br> or die $!;<br>while ( my $line = <$FH> ) {<br> chomp $line;<br> print "line #", $line, "#\n";<br>}<br>close($FH);<br><br>Acredito que com este exemplo já é um bom começo. Também, recomendo que você<br>não se esqueça de usar:<br><br>use strict;<br>use warnings;<br><br>No começo de cada script, vai lhe ajudar muito.<br><br>um abraço,<br><br>-- <br>Otávio Fernandes<br>otaviof at ( gmail.com, cpan.org )<br><a href="http://blog.emresumo.com/"
target="_blank">http://blog.emresumo.com/</a><br>_______________________________________________<br>Cascavel-pm mailing list<br><a ymailto="mailto:Cascavel-pm@pm.org" 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></div></div>
</div><br>
</body></html>