| Wily :: Message. Wily :: Messaggio è un'estensione perl per gestire i messaggi Wily. |
Scarica ora |
Wily :: Message. Classifica e riepilogo
- Licenza:
- Perl Artistic License
- Sito web dell'editore:
- http://search.cpan.org/~sholden/Wily-0.02/lib/Wily.pm
Wily :: Message. Tag
Wily :: Message. Descrizione
Wily :: Il messaggio è un'estensione perl per gestire i messaggi Wily. Wily :: Message è un'estensione perl per gestire i messaggi wily.synopsis Uso Wily :: Message; Usa Wily :: Connect; # Apre un file in Wily ed esce quando la finestra viene distrutta i miei $ win_id; My $ WS = Wily :: Connect :: Connect (); My $ WM = Wily :: Message-> Nuovo (Wily :: Message :: WMNEW, 0, 0, 0, 1, '/ TMP / FILE_TO_EDIT'); $ ws-> syswrite ($ wm-> appiatten ()); My $ buffer = ''; Fino a (Wily :: Message :: Complet_Message ($ buffer)) {$ ws-> sysread ($ buffer, 1024, lunghezza ($ buffer)); } $ buffer = $ wm-> da_string ($ buffer); Se ($ WM -> {Type} == Wily :: Message :: wrrurror) {Die "Errore wmnew: $ wm -> {s} n"; } Elsif ($ WM -> {Tipo} == Wily :: Messaggio :: wrnew) {$ win_id = $ wm -> {window_id}; $ WM = Wily :: Message-> Nuovo (Wily :: Message :: Wmattach, $ win_id, 0, 0, Wily :: Message :: wedestroy); $ ws-> syswrite ($ wm-> appiatten ()); Fino a (Wily :: Message :: Complet_Message ($ buffer)) {$ ws-> sysread ($ buffer, 1024, lunghezza ($ buffer)); } $ buffer = $ wm-> da_string ($ buffer); Se ($ WM -> {TIPE} == Wily :: Message :: wrrurror) {Die "Errore wmattach: $ wm -> {s} n"; } ELSIF ($ WM -> {Type} == Wily :: Message :: wrattach) {} else {die "previsto un wattach, ma non ne ha preso uno"; }} else {Die "atteso un wrnew, ma non ne ha preso uno"; } while (1) {fino a (wily :: messaggio :: complet_message ($ buffer)) {$ ws-> sysread ($ buffer, 1024, lunghezza ($ buffer)); } $ buffer = $ wm-> da_string ($ buffer); Se ($ WM -> {Tipo} == Wily :: Message :: wedestroy e $ wm -> {window_id} == $ win_id) {ultimo; }} Un semplice wrapper oggetto attorno ai messaggi Wily con una funzione di aiutante per aiutare a estrarre i messaggi dalla connessione Wily. Requisiti: · Perl.
Wily :: Message. Software correlato