Puedes usar la función qq() para entrecomillar de forma doble (o q() para hacerlo de forma simple).
Using perl Syntax Highlighting
$code = qq(<font color
="red">ssd
</font
>);Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
En la expresión regular puedes usar las comillas sin problemas.
El problema está en
.*, que es avaricioso. Mejor usa
.*? . Y cuidado con la opción
/g. No lo pongas si realmente no lo vas a usar.
Actualización: wanako, en el siguiente mensaje, descubrió el error: está en el carácter '/' dentro de la expresión regular. Mejor déjalo así:
$code =~ m{<font color="red">(.*?)</font>}i; o así:
$code =~ /<font color="red">(.*?)<\/font>/i;