Wily :: Nachricht. Wilz :: Nachricht ist eine Perl-Erweiterung, um Wilde-Nachrichten zu behandeln.
Jetzt downloaden

Wily :: Nachricht. Ranking & Zusammenfassung

Wily :: Nachricht. Stichworte

Perl-Modul Mitteilungen Perl-Erweiterung. Wily Wilde Nachrichten

Wily :: Nachricht. Beschreibung

Wily :: Nachricht ist eine Perl-Erweiterung, um Wilde-Nachrichten umzugehen. Wily :: Nachricht ist eine Perl-Erweiterung, um Wily-Nachrichten zu handhaben. Synopsis verwenden Wilz: Meldung; Verwenden Sie Wily :: Connect; # Öffnet eine Datei in Wily und exits, wenn das Fenster meine $ win_id zerstört wird. Meine $ ws = Wily :: Connect :: Connect (); MEINE $ WM = WILY :: MESSAGE-> NEU (WILY :: MESSAGE :: WMNEW, 0, 0, 0, 1, '/ TMP / File_to_Edit'); $ ws-> sysswrite ($ wm-> flatten ()); mein $ puffer = ''; bis (Wilz :: Nachricht :: compromen_message ($ puffer)) {$ ws-> sysread ($ -Puffer, 1024, Länge ($ Puffer)); } $ Puffer = $ wm-> from_string ($ Puffer); if ($ wm -> {type} == Wilz: } elsif ($ wm -> {type} == Wilz :: Nachricht :: WRNEW) {$ win_id = $ wm -> {wind_id}; $ wm = Wilz :: Nachricht-> NEU (Wilz :: Nachricht :: Wmattach, $ win_id, 0, 0, Wilz $ ws-> sysswrite ($ wm-> flatten ()); bis (Wilz :: Nachricht :: compromen_message ($ puffer)) {$ ws-> sysread ($ -Puffer, 1024, Länge ($ Puffer)); } $ Puffer = $ wm-> from_string ($ Puffer); if ($ wm -> {type} == Wily :: Nachricht :: Wrerror) {Die "Error Wmattach: $ WM -> {S} n"; } elsif ($ wm -> {type} == Wilz :: Nachricht :: wrattach) {} else {Die "erwartete einen Wrattach, aber nicht einen"; }} else {sterbe "erwartete ein Wrnew, aber nicht einen bekommen"; } Während (1) {bis (wilz: } $ Puffer = $ wm-> from_string ($ Puffer); if ($ wm -> {type} == Wilz :: Nachricht :: Wedestestroy und $ WM -> {window_id} == $ win_id) {LAST; }} Ein einfacher Objektwickler um Wily-Nachrichten mit einer Helferfunktion, um beim Extrahieren von Nachrichten von der Wilzverbindung zu helfen. Anforderungen: · Perl.

Wily :: Nachricht. Zugehörige Software