| Wily :: رسالة Wily :: رسالة هو امتداد بيرل للتعامل مع الرسائل الرائعة. |
التحميل الان |
Wily :: رسالة الترتيب والملخص
- رخصة:
- Perl Artistic License
- موقع ويب الناشر:
- http://search.cpan.org/~sholden/Wily-0.02/lib/Wily.pm
Wily :: رسالة العلامات
Wily :: رسالة وصف
Wily :: Message هو امتداد بيرل للتعامل مع رسائل Wily. Wily :: رسالة هو امتداد بيرل للتعامل مع الرسائل Wily.synopsis استخدام Wily :: رسالة؛ استخدم Wily :: Connect؛ # يفتح ملف في Wily ويخرج عندما يتم تدمير النافذة الخاص بي Win_id؛ بلدي $ WS = Wily :: Connect :: Connect ()؛ My $ WM = Wily :: message-> رسالة جديدة (Wily :: رسالة :: WMNEW، 0، 0، 0، 1، '/ TMP / FILE_TO_EDIT')؛ $ ws-> syswrite ($ wm-> flatten ())؛ بلدي $ المخزن المؤقت = ''؛ حتى (Wily :: رسالة :: completle_message ($ المخزن المؤقت)) {$ ws-> sysread ($ المخزن المؤقت، 1024، الطول ($ المخزن المؤقت))؛ } $ المخزن المؤقت = $ wm-> from_string ($ المخزن المؤقت)؛ إذا ($ WM -> {type} == Wily :: رسالة :: Wrerror) {Die "خطأ WMNEW: $ WM -> {s} n"؛ } elsif ($ WM -> {type} == Wily :: رسالة :: WrNew) {$ win_id = $ wm -> {window_id}؛ $ WM = Wily :: Message-> New (Wily :: message :: WMATTACH، $ WIN_ID، 0، 0، Wily :: رسالة :: Wedestroy)؛ $ ws-> syswrite ($ wm-> flatten ())؛ حتى (Wily :: رسالة :: completle_message ($ المخزن المؤقت)) {$ ws-> sysread ($ المخزن المؤقت، 1024، الطول ($ المخزن المؤقت))؛ } $ المخزن المؤقت = $ wm-> from_string ($ المخزن المؤقت)؛ إذا ($ WM -> {type} == Wily :: رسالة :: Wrerror) {Die "خطأ WMATTACH: $ WM -> {s} n"؛ } Elsif ($ WM -> {type} == Wily :: رسالة :: Wrattach) {} آخر {DIEN "المتوقع حماة، ولكن لم تحصل على واحد"؛ }} {DET "المتوقع" wrnew، لكن لم أحصل على واحد "؛ } بينما (1) {حتى (Wily :: message :: completle_message ($ العازلة)) {$ ws-> sysread ($ المخزن المؤقت، 1024، الطول ($ المخزن المؤقت))؛ } $ المخزن المؤقت = $ wm-> from_string ($ المخزن المؤقت)؛ إذا ($ WM -> {type} == Wily :: رسالة :: Wedestroy و $ WM -> {Window_ID} == $ Win_ID) {STAT؛ }} مجمع كائن بسيط حول رسائل Wily مع وظيفة المساعد للمساعدة في استخراج الرسائل من اتصال Wily. متطلبات: perl.
Wily :: رسالة برامج ذات صلة