Perl : Come sostituire virgola

Il linguaggio di programmazione Perl è stato originariamente progettato per creare report . Contiene potenti funzioni per la manipolazione di file di testo . Ad esempio, è possibile sostituire un carattere ( ad esempio un punto e virgola ) o una stringa di caratteri con un'altra . La funzione " s " è utilizzato per la sostituzione o la sostituzione . Il testo modificato viene inserito in un secondo file di testo e il file originale rimane invariato . La funzione "Apri" apre i file. La funzione " vicino " chiude i file quando avete finito di usarli. Istruzioni
1

Aprire un file di testo vuoto in qualsiasi editor di testo
2

Digitare la riga seguente per avviare lo script Perl : .

# ! /usr /bin /perl
3

Digitare le righe seguenti per aprire il file che contiene il punto e virgola ( " orig_file ") e il file in cui si desidera salvare le modifiche ( " output" ) :

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

aperto ( OUTFILE , " output" ) or die $ ;

Sostituire " orig_file " ! e "output" con i nomi appropriati per il vostro script .
4

Digitare le righe seguenti per creare il ciclo while che leggerà il contenuto del file originale , sostituire il punto e virgola con i due punti e scrivere i cambiamenti per il file di output :

while ( ) per

{

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

stampa OUTFILE $ _ ;

}

sostituire il carattere ": " . nel "$ _ = ~ s /;/:/g; " con qualsiasi carattere che si desidera sostituire il punto e virgola con

5

Tipo le seguenti linee di chiudere i file aperti :

stretti ( OUTFILE ) ;

stretti ( fILE ) ;
6

salvare il file come " sub_semicolon.pl . "
7

Digitare il comando " perl sub_semicolon.pl " al prompt per eseguire lo script di comandi .