النطاق :: العلوي الفعل على النطاقات العليا
التحميل الان

النطاق :: العلوي الترتيب والملخص

النطاق :: العلوي العلامات

الوحدة النمطية بيرل بيرل أعلى مجال نطاقات العليا

النطاق :: العلوي وصف

تصرف على النطاقات العليا حزمة ملخص X؛ استخدام النطاق :: Upper QW / Reap Localize localize_elem localize_delete: الكلمات /؛ SUB DESC {shift -> {desc}} set_tag set_tag {بلدي ($ desc) =_؛ # أولا توطين $ X بحيث يتم تدميرها في الترجمة الأخيرة "$ x" => يبارك ({desc => $ desc}، __package__) => لأعلى؛ # نظام واحد يصل reap sub {بلدي pkg $ = المتصل؛ بلدي x = do {no refs 'refs'؛ $ {$ pkg. ':: x'}؛ # احصل على $ x في نطاق الطباعة $ X-> DESC. ": فعله "؛} => نطاق 1؛ # نفس ما يصل هنا localize_elem" SIG "، '__warn__' => sub {my $ pkg = المتصل؛ لي x = do {no strond 'refs'؛ {$ pkg. ' :: x '}}؛ # احصل على $ X في النطاق Core :: Warn ($ X-> DESC. ":' '. الانضمام (' '' '، @))؛} => UP المتصل 0؛ # نفس UP هنا # حذف Lastet LastGV Element Localize_Delete'T'TEGV '، -1 => UP Sub هنا؛ # نفسها هنا} حزمة Y؛ {x :: set_tag (' pie ')؛ # $ x هو الآن كائن x ، و argv لديه عنصر واحد أقل تحذير "ما"؛ # يحذر "فطيرة: ما في ..." ...} # "فطيرة: /؛ sub try () {my result = shift -> ()؛ بلدي $ cx = sub up sub؛ recind + (want_at (cx)؟ @ Sub Zap {try {returntringthings؛ # إرجاعها لمحاولة () ثم خارج zap () لم يصل إلى} # لم يصل إلى} الخاص بي التي تتيح لك تأجيل إجراءات في وقت التشغيل الذي سيعقد عند إرجاع تدفق التحكم في نطاق علوي. حاليا، يمكنك: * ربط UPPE ص نطاق نهاية مع "جني"؛ * توطين المتغيرات، والقيم الصفيف / التجزئة أو حذف العناصر في سياقات أعلى مع "توطين" على التوالي، "localize_elem" و "localize_delete"؛ * إرجاع القيم على الفور إلى المستوى العلوي مع "الاسترخاء"، ومعرفة سياق كان قيد الاستخدام ثم مع "Want_at". متطلبات: perl.

النطاق :: العلوي برامج ذات صلة