WILY :: BERICHT WILLY :: MESSAGE is een PERL-extensie om WILY-berichten aan te pakken.
Download nu

WILY :: BERICHT Rangschikking & Samenvatting

WILY :: BERICHT Tags

Perl-module berichten Perl-extensie Willy WILY-berichten

WILY :: BERICHT Beschrijving

Wely :: Message is een Perl-extensie om WILY-berichten aan te pakken. WILLY :: bericht is een perl-extensie om WILY-berichten te verwerken. Synopsis Gebruik WILY :: BERICHT; Gebruik WILY :: Connect; # Opent een bestand in WILY en verlaat wanneer het venster mijn $ Win_ID wordt vernietigd; mijn $ WS = WILLY :: Connect :: Connect (); My $ WM = WILLY :: Message-> NIEUW (WILLY :: MESSAGE :: WMNIEUW, 0, 0, 0, 1, '/ TMP / FILE_TO_EDIT'); $ WS-> Syswrite ($ WM-> Flatten ()); mijn $ buffer = ''; Tot (WILLY :: BERICHT :: COMPLETE_MESSAGE ($ BUFFER)) {$ WS-> SYSREAD ($ buffer, 1024, lengte ($ buffer)); } $ buffer = $ WM-> from_string ($ buffer); if ($ WM -> {Type} == WILLY :: MESSAGE :: WERROR) {DIE "FOUT WMNIEUW: $ WM -> {S} N"; } Elsif ($ WM -> {Type} == WILLY :: MESSAGE :: WRNEW) {$ Win_id = $ WM -> {window_id}; $ WM = WILLY :: BERICHT -> NIEUW (WILLY :: BERICHT :: WMATCHACH, $ WIN_ID, 0, 0, WILLY :: MESSAGE :: WEDESTROY); $ WS-> Syswrite ($ WM-> Flatten ()); Tot (WILLY :: BERICHT :: COMPLETE_MESSAGE ($ BUFFER)) {$ WS-> SYSREAD ($ buffer, 1024, lengte ($ buffer)); } $ buffer = $ WM-> from_string ($ buffer); if ($ WM -> {Type} == WILY :: MESSAGE :: Werror) {DIE "FOUT WMATCH: $ WM -> {S} N"; } Elsif ($ WM -> {Type} == WILLY :: BERICHT :: Wrattach) {} anders {dobbelsteen "verwachtte een wrattach, maar kreeg er geen"; }} anders {sterven "verwachtte een wrnew, maar kreeg er geen"; } Tijdens (1) {tot (WILY :: BERICHT :: COMPLETE_MESSAGE ($ BUFFER)) {$ WS-> SYSREAD ($ buffer, 1024, lengte ($ buffer)); } $ buffer = $ WM-> from_string ($ buffer); if ($ WM -> {Type} == WILY :: BERICHT :: WEDESTROY EN $ WM -> {venster_id} == $ win_id) {laatste; }} Een eenvoudig object Wrapper rond WILY-berichten met een helperfunctie om te helpen bij het extraheren van berichten van de WILLY-verbinding. Vereisten: · Perl

WILY :: BERICHT Gerelateerde software