POE :: Component :: Server :: DNS

مكون خادم DNS غير الحظر المتزامن
التحميل الان

POE :: Component :: Server :: DNS الترتيب والملخص

الإعلانات

  • Rating:
  • رخصة:
  • Perl Artistic License
  • السعر:
  • FREE
  • اسم الناشر:
  • Chris Williams
  • موقع ويب الناشر:
  • http://search.cpan.org/~bingos/

POE :: Component :: Server :: DNS العلامات


POE :: Component :: Server :: DNS وصف

مكون خادم DNS غير الحظر المتزامن POE :: Component :: Component :: Server :: DNS هو مكون PoE الذي يقوم بتنفيذ DNS Server.IT يستخدم POE :: العميل :: DNS للتعامل مع الحل عند تكوينه ك "Forward_Only" و Net :: DNS :: محلل: . استخدام صافي :: DNS :: RR؛ استخدم PoE QW (مكون :: خادم :: DNS)؛ My DNS_SERVER = POE :: Component :: خادم :: DNS-> Spawn (الاسم المستعار => 'DNS_SERVER')؛ poe :: session-> إنشاء (package_states => ،]،)؛ $ poe_kernel-> تشغيل ()؛ الخروج 0؛ Sub _Start {بلدي (kernel $ kernel، $ heap) = @ _ ؛ # أخبر المكون الذي نريد سجل الأحداث للذهاب إلى "سجل" Kernel-> Post ('DNS_SERVER'، "LOG_EVENT"، "LOG")؛ # سجل معالج لأي مجالات foobar.com مفطولات محتوية $ kernel-> post ('dns_server'، add_handler، {حدث => 'handler'، التسمية => 'foobar'، match => 'foobar.com $'،}) ؛ UNDEF؛ } handler الفرعي {بلدي ($ qname، $ qclass، $ qtype، الاتصال $) =_ ؛ بلدي ($ rcode،ans، auth، @ autd)؛ إذا ($ QTYPE EQ "A") {My ($ TTL، RDATA $) = (3600، "10.1.2.3")؛ دفع @ Pans، Net :: DNS :: RR-> جديد ("$ QNAME $ TTL $ qclass $ qtype $ rdata")؛ $ rcode = "noerror"؛ } آخر {$ rcode = "nxdomain"؛ } $ اتصال -> ($ rcode،ans، As، @ @ UNDEF؛ } السجل الفرعي {بلدي ($ ip_port، $ net_dns_packet) = @ _ ؛ $ net_dns_packet-> طباعة ()؛ UNDEF؛ } متطلبات: perl.


POE :: Component :: Server :: DNS برامج ذات صلة

شجرة :: rb

تنفيذ بيرل للشجرة الحمراء / السوداء، وهو نوع من شجرة البحث الثنائية المتوازنة ...

150

تحميل

معلومات عنا