Ursprünglich als Unix Skriptsprache entwickelt , Perl hat sich zu einem Allzweck-Programmiersprache in verschiedenen Kapazitäten eingesetzt. Es wird immer noch als Unix -und Linux- Skriptsprache von Systemadministratoren verwendet . Eine der Anwendungen der Sprache sein kann , um zu testen , ob eine Datei existiert und entweder ausdrucken , die Antwort auf dem Bildschirm oder wirken auf das Ergebnis. Die Option "- e" filehandle wird verwendet, um die Existenz der Datei zu testen. Anleitung
1
Öffnen Sie ein leeres Dokument in einem beliebigen Texteditor.
2
Typ "#! /Usr /bin /perl- w" in der ersten Zeile des Dokuments das Perl-Skript zu starten.
3
Geben Sie die Zeile " $ file = ' file.txt ", um die Variable, die den Namen der Datei enthält erstellen. Ersetzen Sie " file.txt " mit dem Namen der Datei , die Sie für .
4
Typ testen Sie die Zeile " if ( -e $ file ) { ", um die if-Anweisung , die für die Kontrollen . Datei
5
Geben Sie die Zeile "print" Ja, es gibt die Datei "; }" den Line-Ausgang " Ja, es gibt die Datei ! " auf dem Bildschirm , wenn die Datei vorhanden ist .
6
Geben Sie die Zeile "else {print" Nein, wird die Datei nicht existiert . ";)" , um die Linie " Nein, wird die Datei nicht gedruckt existieren. " wenn die Datei nicht existiert
7
Geben Sie die Zeile "exit ; " . . den Perl-Skript schließen
8
Speichern Sie die Datei als " file_exist.pl " und schließen Sie die Datei .
9
Typ "perl file_exist.pl " an einer Eingabeaufforderung , um das Skript auszuführen.