[Cascavel-pm] Informacoes no arquivo

[Frederico Recsky]

Ola,

> oBS: pensei em utilizar uma expressao regulara para verificar se a $VAR
> cmeca por V?? se alguem puder me ajudar!!

acho bem mais facil por expressão regular.

<code>

open (IN,"teste.txt");

while(<IN>){

        # coloco no vetor @variaveis se a linha atual começa com V
        push @variaveis, $_ if (/^V/);

}

print @variaveis;

</code>

saida:

V-NOME B1910 300.00 001111 X
V-NOME B1910 300.00 002222 C
V-NOME B1910 300.00 003333 X
V-NOME B1910 300.00 004444 C
V-END B1910 300.00 001111 X
V-END B1910 300.00 002222 C
V-END B1910 300.00 003333 X
V-END B1910 300.00 004444 C


Se possivel, leia isso aqui, o livro é baratinho e muito bom, e tem
uma versão online dele:

http://www.aurelio.net/doc/nerd.html#livro-er



--
____________________________
Frederico Recsky
Linux User: 253572
http://www.gulivap.org
http://sao-paulo.pm.org/