| 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 10 Benutzer online
» 0 Mitglieder
» 5 Gäste
AhrefsBot, Bing, Crawl, Google, bot
|
|
|
Eine leere Textdatei erstellen |
|
Geschrieben von: Joopi - 16-11-2024, 11:29 - Forum: Programmieren
- Keine Antworten
|
 |
Wie wird in Perl eine leere Textdatei erstellt?
Code: my $datei = "leere_datei.txt";
# Datei im Schreibmodus öffnen
open(my $fh, '>', $datei) or die "Kann die Datei nicht erstellen: $!";
# Datei schließen
close($fh);
print "Die Datei '$datei' wurde erstellt.\n";
Erklärung:
Code: open(my $fh, '>', $datei):
Öffnet die Datei $datei im Schreibmodus (>).
Wenn die Datei nicht existiert, wird sie erstellt.
Wenn die Datei existiert, wird ihr Inhalt gelöscht.
Schließt den Datei-Handle, um sicherzustellen, dass die Datei korrekt gespeichert wird.
or die "...":
Gibt eine Fehlermeldung aus und beendet das Skript, falls das Öffnen der Datei fehlschlägt (z. B. aufgrund von fehlenden Schreibrechten).
Alternative Methode: Mit touch
Falls du das Modul File::Touch verwenden möchtest, kannst du eine leere Datei ähnlich wie mit dem Linux-Befehl touch erstellen:
Code: use File::Touch;
my $datei = "leere_datei.txt";
touch($datei);
print "Die Datei '$datei' wurde erstellt.\n";
Installation von File::Touch:
Falls das Modul noch nicht installiert ist, kannst du es über CPAN installieren:
|
|
|
|
