विली :: संदेश Wily :: संदेश Willy संदेशों को संभालने के लिए एक पर्ल एक्सटेंशन है।
अब डाउनलोड करो

विली :: संदेश रैंकिंग और सारांश

विली :: संदेश टैग

पर्ल मॉड्यूल संदेशों पर्ल एक्सटेंशन चतुर विली संदेश

विली :: संदेश विवरण

विली :: संदेश एक प्रकार के संदेशों को संभालने के लिए एक पर्ल एक्सटेंशन है। Wily :: संदेश Willy संदेशों को संभालने के लिए एक पर्ल एक्सटेंशन है। Synopsis Willy :: संदेश का उपयोग करें; Willy का उपयोग करें :: कनेक्ट; # विली में एक फ़ाइल खोलता है और बाहर निकलता है जब खिड़की को $ Win_ID नष्ट कर दिया जाता है; मेरा $ ws = wily :: कनेक्ट :: कनेक्ट (); मेरा $ wm = wily :: संदेश-> नया (willy :: संदेश :: WMNew, 0, 0, 0, 1, '/ tmp / file_to_edit'); $ WS-> Syswrite ($ WM-> Flatten ()); मेरा $ बफर = ''; जब तक (wily :: संदेश :: पूर्ण_मेसेज ($ बफर)) {$ WS-> SysRead ($ बफर, 1024, लंबाई ($ बफर)); } $ बफर = $ WM-> FROM_STRING ($ बफर); यदि ($ wm -> {टाइप} == Willy :: संदेश :: wreerror) {DIE "त्रुटि WMNEW: $ WM -> {s} n"; } Elsif ($ WM -> {टाइप} == willy :: संदेश :: wrnew) {$ WIN_ID = $ WM -> {window_ID}; $ wm = wily :: संदेश-> नया (Willy :: संदेश :: WMATTACH, $ WIN_ID, 0, 0, WILY :: संदेश :: Wedestrosy); $ WS-> Syswrite ($ WM-> Flatten ()); जब तक (wily :: संदेश :: पूर्ण_मेसेज ($ बफर)) {$ WS-> SysRead ($ बफर, 1024, लंबाई ($ बफर)); } $ बफर = $ WM-> FROM_STRING ($ बफर); यदि ($ wm -> {टाइप} == willy :: संदेश :: wreerror) {die "त्रुटि wmattach: $ wm -> {s} n"; } Elsif ($ WM -> {टाइप} == willy :: संदेश :: wrattach) {} और {मर "एक wrattach की उम्मीद है, लेकिन एक नहीं मिला"; }} और {मर "एक wrnew की उम्मीद है, लेकिन एक नहीं मिला"; } जबकि (1) {जब तक (willy :: संदेश :: पूर्ण_मेसेज ($ बफर)) {$ WS-> SysRead ($ बफर, 1024, लंबाई ($ बफर)); } $ बफर = $ WM-> FROM_STRING ($ बफर); यदि ($ wm -> {टाइप} == Willy :: संदेश :: WEDESTROY और $ WM -> {window_id} == $ Win_ID) {अंतिम; }} Wily कनेक्शन से संदेश निकालने में सहायता के लिए एक सहायक कार्य के साथ एक सहायक संदेश के चारों ओर एक साधारण वस्तु रैपर। आवश्यकताएं: · पर्ल

विली :: संदेश संबंधित सॉफ्टवेयर