| Hallo, Gast |
Du musst dich registrieren bevor du auf unserer Seite Beiträge schreiben kannst.
|
| Foren-Statistiken |
» Mitglieder: 1
» Neuestes Mitglied: Joopi
» Foren-Themen: 485
» Foren-Beiträge: 664
Komplettstatistiken
|
| Benutzer Online |
Momentan sind 14 Benutzer online
» 1 Mitglieder
» 8 Gäste
AhrefsBot, Bytespider, Crawl, DotBot, bot, Joopi
|
|
|
File Test Operator für Dateien und Ordner |
|
Geschrieben von: Joopi - 16-11-2024, 11:23 - Forum: Programmieren
- Keine Antworten
|
 |
Einfache Prüfung, ob eine Datei existiert.
Code: my $datei = "beispiel.txt";
if (-e $datei) {
print "Die Datei '$datei' existiert.\n";
} else {
print "Die Datei '$datei' existiert nicht.\n";
}
Zusätzliche Datei-Prüfungen
Perl bietet viele weitere File Test Operators, um Dateien und Verzeichnisse zu überprüfen. Hier sind einige nützliche Operatoren:
Operator
Beschreibung
Existiert die Datei?
Ist es eine reguläre Datei?
Ist es ein Verzeichnis?
Ist die Datei lesbar?
Ist die Datei schreibbar?
Ist die Datei ausführbar?
Ist die Datei leer?
Gibt die Größe der Datei zurück.
Code: my $datei = "beispiel.txt";
if (-e $datei) {
print "Die Datei '$datei' existiert.\n";
if (-f $datei) {
print "Es ist eine reguläre Datei.\n";
} elsif (-d $datei) {
print "Es ist ein Verzeichnis.\n";
}
print "Die Datei ist " . (-s $datei) . " Bytes groß.\n" if -s $datei;
print "Die Datei ist lesbar.\n" if -r $datei;
print "Die Datei ist schreibbar.\n" if -w $datei;
print "Die Datei ist ausführbar.\n" if -x $datei;
} else {
print "Die Datei '$datei' existiert nicht.\n";
}
|
|
|
|
