Cómo guardar correctamente contenido de un editor WYSIWYG
Publicado: 2021-03-27 09:12 @425Buenos días. Tengo un problema a la hora de guardar contenido de un editor WYSIWYG en un .dat simple desde Perl.
Al guardar se desconfigura el contenido, e incluso salta las líneas del campo preestablecido donde debe estar contenido dicha información.
Esto guarda, pero como explique anteriormente se desconfigura el contenido que está dentro de la variable $parrafo.
Cabe destacar que guardo información por línea, como se muestra en el código, un grupo de artículos informativos. Por tanto el error daña la visualización terriblemente.
Me gustaría saber qué posible solución se podría hacer. De antemano, gracias.
Al guardar se desconfigura el contenido, e incluso salta las líneas del campo preestablecido donde debe estar contenido dicha información.
Using perl Syntax Highlighting
- open (DATOS, "$archivo_articulos") || &Error ($!, "$archivo_articulos");
- open (TEMPORAL, ">$archivo_temporal") || &Error ($!, "$archivo_temporal");
- while($archivo=<DATOS>){
- chop $archivo;
- $parrafo=~s/\r//g;
- $parrafo=~s/\n/\<br>/g;
- $parrafo=~s/\n/<\p>/g;
- $cadena="$archivo";
- @matriz=split("\t",$archivo);
- $cod=$matriz[0];
- if ($cod eq $codigo){
- $cadena="$codigo\t";
- $cadena="$cadena$titulo\t";
- $cadena="$cadena$parrafo\t$galerias\t$linkt\t$link\t$autor\t$email\t$inactivo";
- }
- print TEMPORAL "$cadena\n";
- }
- close DATOS;
- close TEMPORAL;
- open (TEMPORAL, "$archivo_temporal") || &Error ($!, "$archivo_temporal");
- @mat=<TEMPORAL>;
- close TEMPORAL;
- open (DATOS, ">$archivo_articulos") || &Error ($!, "$archivo_articulos");
- print DATOS @mat;
- close DATOS;
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
Esto guarda, pero como explique anteriormente se desconfigura el contenido que está dentro de la variable $parrafo.
Cabe destacar que guardo información por línea, como se muestra en el código, un grupo de artículos informativos. Por tanto el error daña la visualización terriblemente.
Me gustaría saber qué posible solución se podría hacer. De antemano, gracias.