Die Programmiersprache Perl wurde ursprünglich entwickelt, um Berichte zu erstellen . Es enthält leistungsfähige Funktionen für die Manipulation von Textdateien. Zum Beispiel können Sie ein Zeichen ( z. B. ein Semikolon ) oder eine Zeichenfolge mit einer anderen zu ersetzen. Das "s" -Funktion ist für die Substitution oder Ersatz verwendet . Der bearbeitete Text in eine zweite Textdatei eingefügt und die ursprüngliche Datei unverändert bleibt. Die "open "-Funktion öffnet die Dateien. Die "close "-Funktion schließt die Dateien , wenn Sie fertig sind mit ihnen . Anleitung
1
Öffnen Sie eine leere Textdatei in einem beliebigen Texteditor
2
Geben Sie die folgende Zeile in das Perl-Skript zu starten: .
#! /usr /bin /perl
3
Geben Sie die folgenden Zeilen in die Datei öffnen , die ein Semikolon enthält ( " orig_file " ) und die Datei in dem Sie die Änderungen speichern wollen ( "output" ):
open ( FILE, " orig_file " ) or die $ ;
open ( OUTFILE , " Ausgang" ) or die $ ;
Ersetzen " orig_file " ! und " Ausgabe" mit den entsprechenden Namen für Ihr Skript .
4
Geben Sie die folgenden Zeilen in die while-Schleife , die den Inhalt der ursprünglichen Datei gelesen wird erstellen, ersetzen Sie die Semikolons durch Doppelpunkte und schreiben Sie die Änderungen in die Ausgabedatei :
while ( )
{
$ _ = ~ s /;/:/g;
Druck OUTFILE $ _ ; }
austauschen ":" . in " $ _ = ~ s /;/:/g; " mit dem, was von Ihnen gewünschte Zeichen , die mit Semikolon ersetzen
5
Geben Sie die folgenden Zeilen , um die offenen Dateien zu schließen :
close ( OUTFILE );
close ( FILE) ;
6
Speichern Sie die Datei als " sub_semicolon.pl . "
7
Geben Sie den Befehl "perl sub_semicolon.pl " an einer Eingabeaufforderung , um das Skript auszuführen.