Netz enthält eine Reihe nützlicher Routinen für viele Webworking-Zwecke.
Jetzt downloaden

Netz Ranking & Zusammenfassung

Netz Stichworte

Netz Perl-Modul Perl Routinen Web-Routinen Perl-Routinen

Netz Beschreibung

Das Web-Perl-Modul enthält eine Reihe nützlicher Routinen für viele Webworking-Zwecke. Das Web-Perl-Modul enthält eine Reihe nützlicher Routinen für viele Webworking-Zwecke. Dieses Modul wurde hauptsächlich für UNIX / Linux-Systeme erstellt. Teile davon können nicht auf anderen Systemen verwendet werden. Z.B. Die Prozeduren für Dateiverriegelungsanforderungssysteme, die Symlinks verwenden können. Wenn Sie das Modul auf Systemen verwenden, in denen Symlinks nicht verwendet werden können, können tödliche Fehler passieren Es verwendet auch eigene Varianten von Routinen, die zuerst in den berühmten Bibliotheken CGI.PM und CGI-LIB.pl.installation erfunden wurde. PM in ein praktisches Fleck, z. B. Ihr Home-Verzeichnis oder in CGI-Bin selbst und präfixieren Sie alle Perl-Skripts, die es mit etwas in den Zeilen der folgenden Präambel nennen: Verwenden Sie lib '/ home / myName / perl / lib'; Verwenden Sie das Web; NLOCKTHIS-Routine ermöglicht es, ein Filelock über NFS-Grenzen einzustellen. Der allgemein verwendete Perl-Routine-Flock () schlägt an diesem Punkt aus, sodass diese Routine eine verwendbare Alternative für größere Dateisysteme ist. Es verwendet die modularen Funktionen Link () und Unlink (), um eine Datei gesperrt zu markieren. Darüber hinaus gibt es auch die gesperrte Datei einen Zähler: eine Datei, die für mehr als $ $ web :: max_locktime sekunden gesperrt ist, wird vom nächsten Prozess freigegeben, der NLOCK () in dieser Datei nennt. Ein Anrufvorgang erhält entweder 0 oder 1 als Rückgabewert, wobei 1 zurückgegeben wird, wenn die Dateiverriegelung erfolgreich war. 0 wird nur zurückgegeben, wenn der Prozess auf mehr als $ $ web :: max_waitlock sekunden wartet oder wenn symlink () fehlschlägt.Example 1: $ fileName = "data.txt"; Nlock ($ Dateiname); offen (F1, "$ Dateiname"); # etwas schließen F1; Nunlock ($ Dateiname); Beispiel 2: #! / Local / bin / perl5 Web verwenden; $ stat = nlock ("jump.pl"); drucken "sperren: stat = $ statn"; $ stat = nlock ("jump.pl"); drucken "Sperren Sie diese Datei erneut: stat = $ statn"; Schlaf 8; $ stat = nlock ("jump.pl"); drucken "Sperren Sie diese Datei erneut: stat = $ statn"; $ stat = nunlock ("jump.pl"); drucken "Entsperren: stat = $ statn"; Ausfahrt; Anforderungen: · Perl.

Netz Zugehörige Software