Ver Mensaje Individual
Antiguo 06-may-2008, 14:42   #11 (permalink)
jferrero
Colaborador
jferrero está en el buen camino
 
Fecha de Ingreso: mayo-2006
Mensajes: 347
Re: Consulta Expresion Regular

Código:
#!/usr/bin/perl
use warnings;
use strict;

my @v = ('casa','color');
my $frase = "La casa de color azul\n";

for my $param ( @v ) {
    $frase =~ s/$param/<FONT COLOR="red">$param<\/FONT>/;
}

print $frase;
El problema está en la definición del array @v. Estabas usando corchetes, con lo que realmente estabas definiendo un array anónimo con dos elementos, con lo que @v contenía un solo elemento: una referencia a ese array.
jferrero está desconectado   Responder Citando