Foro - Perl en Español

por **ivanlog19** » 2009-10-02 17:03 @752

Hola, tengo en una variable escalar un texto el cual tiene una comilla simple entre sus caracteres.

Quiero poner adelante de dicha comilla simple una barra invertida.

Ejemplo:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$dato = "tengo una ' en el texto";
 
# 1er intento:
$dato =~ s/'/\'/g; #esto me lo deja así: "tengo una ' en el texto"
 
# 2do intento:
$dato =~ s/'/\\'/g; #esto me lo deja así: "tengo una \\' en el texto"
 
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

¿Cómo puedo hacer para que me quede así: "tengo una \' en el texto"?

¡Gracias!

#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
 
my $dato = "tengo una ' en el texto";
 
print "$dato:", length($dato), "\n";   # tengo una ' en el texto:23
 
$dato =~ s/'/\\'/g;
 
print "$dato:", length($dato), "\n";   # tengo una \' en el texto:24
 
__END__
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **ivanlog19** » 2009-10-02 17:15 @760

Perdonen, esa es la solución.

El problema era que lo hacía 2 veces; me había olvidado de borrarlo una vez.

Gracias.

Foro - Perl en Español

Problema sustituyendo con expresiones regulares

Problema sustituyendo con expresiones regulares

Publicidad

Re: problema sustituyendo con expresiones regulares

Re: Problema sustituyendo con expresiones regulares

¿Quién está conectado?