[Cascavel-pm] Variaveis em ER

[Nelson Ferraz]

> Eh possivel utilizar-se de variaveis escalares (do tipo $alguma_coisa) em
> Expressoes Regulares? Como fazer?

Não sei se é isso o que você quer fazer, mas aqui vai um exemplo bem
simples:


###

$text = "programando em perl";
@regexp = ('\d', '\w', 'em', 'asdf');

foreach $regexp (@regexp) {
  if ($text =~ $regexp) {
    print "match: $regexp\n";
  } else {
    print "don't match: $regexp\n";
  }
}

###

Isto vai resultar em:

don't match: \d
match: \w
match: em
don't match: asdf

###

Você também poderia colocar a variável dentro da expressão regular, como
por exemplo: 

  if ($text =~ /^$regexp/) { ...

[]s

Nelson