[FUG-BR] Ajuda em script perl

[Alexandre Biancalana]

Tenta algo assim:

for ( my $i=0; $i <= $#sua_matriz $i++ ) {
  if ( $sua_matriz[$i] =~ /$oq_vc_procura/ ) {
     print "posicao: $i\n";
     last;
  }
}

2009/9/19 Fabio <binho62 em yahoo.com.br>:
> Olá amigos, boa tarde.
>
> Preciso criar um script em perl para fazer uma busca dentro de um arquivo.txt.
> Esse arquivo.txt eu guardei numa matriz (@minhamatriz).
> Dentro dessa matriz eu faço uma busca por palavra utilizando o foreach e grep, só que não consegui saber qual posição da matriz essa palavra encontrada está.
>
> Como faz isso?
>
> Obrigado, Fábio.
>
>
>      ____________________________________________________________________________________
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados.yahoo.com
> -------------------------
> Histórico: http://www.fug.com.br/historico/html/freebsd/
> Sair da lista: https://www.fug.com.br/mailman/listinfo/freebsd
>