/ gc não está pegando Mississippi na minha lista - qual é o problema aqui? [fechadas]

0
#!/usr/bin/perl
#match5.pl

open(INFILE,"test2.txt") || die "$!";
print "Enter the pattern you wish to match: ";
chomp(my$pat=<STDIN>);
my$num_letters=0;
while(<INFILE>)
{
 if(/$pat/)
 {
  $pat=~/\w/gc;
  $num_letters++;
  print "$_ contains the pattern $pat and teh number of $pat is $num_letters\n";
 }
}
print "Number of $pat is $num_letters\n";
close(iNFILE);
    
por Jorge Castro 10.11.2010 / 15:05

1 resposta

1

Não há melhor resposta para essa pergunta em particular do que a fornecida pela documentação do perl.

Então, para responder à sua pergunta, mostrarei como mostrar esta documentação e encontrar o bit relevante.

Para instalar a documentação do perl. (perldoc é um pouco parecido com o homem, na verdade você pode frequentemente chamar man em muitas das documentações do perl)

sudo apt-get install perldoc

Para ler um documento, digite perldoc e, em seguida, o nome do documento.

perldoc perldoc #this is the perldoc about how to use perldoc
perldoc perl #this is a good starting point, tells you about some available documentation

Mas, para avançar e responder sua pergunta, você precisará ler

perldoc perlretut

e pesquise a seção intitulada "Correspondência global"

espero que ajude.

    
por finley 10.11.2010 / 15:53