Saludos, comunidad de perlenespañol. En esta oportunidad les escribo porque estoy intentando realizar una función para agregar emoticones a las cadenas antes de guardarla en la base de datos y surge un problema con mi función que no logro solucionar. Espero puedan ayudarme.
-
- Publicidad
Agregar emoticones a cadena en perl
2 mensajes
• Página 1 de 1
Agregar emoticones a cadena en perl
por fjmn2001 » 2013-01-07 10:31 @480
- fjmn2001
- Perlero nuevo
- Mensajes: 29
- Registrado: 2009-06-25 15:11 @674
Publicidad
Re: Agregar emoticones a cadena en perl
por explorer » 2013-01-07 10:46 @490
El problema son los '/' que se mezclan con los '/' delimitadores del operador s///.
En ese caso, es mejor usar otros delimitadores. Por ejemplo:
(Las comillas dobles no hace falta escaparlas).
En ese caso, es mejor usar otros delimitadores. Por ejemplo:
Using perl Syntax Highlighting
- sub agregar_emoticones{
- my $cadena = shift;
- $cadena =~ s{:\)}{<img src="image/emoticones/sonrisa1.png">}g;
- return $cadena;
- }
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
(Las comillas dobles no hace falta escaparlas).
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
2 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 22 invitados