Perl : Cómo reemplazar punto y coma

El lenguaje de programación Perl fue diseñado para crear informes. Contiene potentes funciones para la manipulación de archivos de texto. Por ejemplo , puede reemplazar un carácter (por ejemplo, un punto y coma ) o una cadena de caracteres por otra. La función de " s " se utiliza para la sustitución o el reemplazo . El texto editado se coloca en un segundo archivo de texto y el archivo original permanece sin cambios . La función "Abrir" abre los archivos. La función de "cerrar" cierra los archivos cuando termine de usarlos. Instrucciones
1

Abra un archivo de texto en blanco en cualquier editor de texto
2

Escriba la línea siguiente para iniciar el script de Perl : .

#! /usr /bin /perl
3

escriba las líneas siguientes para abrir el archivo que contiene el punto y coma ( " orig_file " ) y el archivo donde desea guardar los cambios ( "output" ) :

open ( FILE, " orig_file ") or die $ ;

abierto ( OUTFILE , " salida" ) or die $ ;

Reemplazar " orig_file " ! y " salida" con los nombres apropiados para su guión.
4

escriba las líneas siguientes para crear el bucle while que leerá el contenido del archivo original , cambie el punto y coma con dos puntos y escribir los cambios al archivo de salida :

while ( )

{

$ _ = ~ s /;/:/g;

impresión OUTFILE $ _ ;

}

reemplace las " : ." en "$ _ = ~ s /;/:/g; " con el carácter que desea reemplazar el punto y coma con
Página 5

escriba las líneas siguientes para cerrar los archivos abiertos :

cercanos ( OUTFILE ) ;

cercanos (FILE ) ;
6

Guarde el archivo como " sub_semicolon.pl . "
7

Escriba el comando " perl sub_semicolon.pl " en un símbolo del sistema para ejecutar el script.