• Publicidad

Cambiar comillas simples por dobles

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Cambiar comillas simples por dobles

Notapor lis » 2009-08-19 17:16 @761

Hola amigos del foro. En un foro anterior creating021 me recomendó leer una sección de expresiones regulares en Perl. Lo estudié pero aún no consigo lo que deseo hacer y es por eso que acudo a ustedes, y es que deseo reemplazar las comillas simples(') por comillas dobles (") de un archivo y hago lo siguiente en mi script:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
system "(sed -i 's/'/\"/g' dominio.ncl)";
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


Muchas gracias por su aporte.
lis
Perlero nuevo
Perlero nuevo
 
Mensajes: 106
Registrado: 2008-05-27 21:43 @946

Publicidad

Re: Cambiar comillas simples por dobles

Notapor explorer » 2009-08-19 19:19 @847

(no probado)
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
open my $fichero, q[<], 'dominio.ncl';
my @fichero = <$fichero>;
close $fichero;
s/\'/\"/g for @fichero;
open my $fichero, q[>], 'dominio.ncl';
print $fichero @fichero;
close $fichero;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Otra forma, con Tie::File (no probado):
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
use Tie::File;
tie my @array, 'Tie::File', "dominio.ncl" or die "Error Tie::File";
for (@array) { s/\'/"/g; }
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 3 invitados

cron