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 < br > 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.