<tt>Pessoal..<br> o arquivo nao eh por TAB<br> <br> <br> formato do meu arquivo:<br> <br> var TEL<br> <br> var FIL<br> <br> var FAX<br> <br> var ALTSE total stns 224 # non-missing obs 114<br> <br> TIPO TIME ID TESTE<br> V-NOME B1910 300.00 001111 X<br> V-NOME B1910 300.00 002222 C<br> V-NOME B1910 300.00 003333 X<br> V-NOME B1910 300.00 004444 C<br> <br> TIPO TIME ID TESTE<br> V-END B1910 300.00 001111 X<br> V-END B1910 300.00 002222 C<br> V-END B1910 300.00 003333 X<br> V-END B1910 300.00 004444 C<br> <br> <br> Eu quero pegar somente as VARIAVEIS que comecem com V , no caso<br> V-NOME, V-END.. pq as outras nao possuem valor..var TEL , var FAX ...<br> <br> Como sugerido pelo amigo, fiz:<br> <br> open(FH, '<teste.txt');<br> @table = <FH>;<br> shift @table; #descarta primeira linha<br> close(FH);<br> foreach(@table)<br> {<br> # Esse UNDEF é pq possui espaco em branco antes da variavel..<br> (undef,$var,$tipo,$time,$id,$test) = split /\s+/, $_;<br> print "VAR: $var
TIPO: $tipo TESTE: $test \n";<br> <br> <br> }<br> <br> So que esta pegando tudo...<br> <br> Alguem pode me ajudar?? :)<br> <br><br><br><br>oBS: pensei em utilizar uma expressao regulara para verificar se a $VAR cmeca por V?? se alguem puder me ajudar!!<br><br>Obrigada<br> </tt><p>
<hr size=1>
<a href="http://us.rd.yahoo.com/mail/br/tagline/mail/*http://br.info.mail.yahoo.com/">Abra sua conta no Yahoo! Mail</a> - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.