
11/04/2005, 04:55
|
 | $moderador{'Esteban'} | | Fecha de Ingreso: febrero-2002 Ubicación: Buenos Aires - Argentina
Mensajes: 8.762
Antigüedad: 23 años Puntos: 90 | |
$dmbody = <FONT SIZE="4" FACE="Comic Sans,Helvetica, Serif">$dmbody</FONT>
Esto está mal sintácticamente, fijate que lo correcto sería
$dmbody = qq~<FONT SIZE="4" FACE="Comic Sans,Helvetica, Serif">$dmbody</FONT>~;
Porque:
todas las sentencias Perl terminan en un ;
con ~~le dices cual es el principio y el final de $dmbody
puedes usar q o qq, la primera toma todo literal y la segunda interpreta la variable de adentro ($dmbody)
Pero esto lo debes hacer a lo último de todo, cuando la variable $dmbody ya tiene la información cargada, sino sería
$dmbody = $dmbody . '<font size="2" ...>Below is the result of your feedback form. It was submitted by</font>' . "\r\n";
Se entiende ?
Espero que te sirva
Saludos
PD: Respondeme por acá mismo...En este Post
__________________ Esteban Quintana |