Mail::SpamCannibal::ScriptSupport

Mail::SpamCannibal::ScriptSupport is a collection of script helpers.
Download

Mail::SpamCannibal::ScriptSupport Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Michael Robinton
  • Publisher web site:
  • http://search.cpan.org/~miker/Net-DNS-Codes-0.09/Codes.pm

Mail::SpamCannibal::ScriptSupport Tags


Mail::SpamCannibal::ScriptSupport Description

Mail::SpamCannibal::ScriptSupport is a collection of script helpers. Mail::SpamCannibal::ScriptSupport is a collection of script helpers.SYNOPSIS use Mail::SpamCannibal::ScriptSupport qw( DO SerialEntry TarpitEntry DNSBL_Entry id question revIP query dns_udpsend dns_udpresp dns_ans dns_ns dns_ptr rlook_send rlook_rcv zone_def valid127 validIP zap_one zap_pair job_died dbjob_chk dbjob_kill dbjob_recover unpack_contrib lookupIP list2NetAddr matchNetAddr BLcheck checkclct dumpIPs BLpreen mailcheck abuse_host is_GENERIC block4zonedump );FUNCTIONS $rv = DO($file); $packedIPaddr = SerialEntry() $packedIPaddr = TarpitEntry(); $packedIPaddr = DNSBL_Entry(); $unique = id($seed); $querybuf = question($name,$type); $rev = revIP($ip); $response = query($buffer,$timeout); $socket = dns_udpsend($buffer,$timeout); $response = dns_udpresp($socket,$timeout); ($aptr,$tptr,$auth_zone) = dns_ans($buffer); $nsptr = dns_ns($buffer); $hostname = dns_ptr($buffer); @hosts = dns_ptr($buffer); $socket = rlook_send($IP,$timeout); $hostname = rlook_rcv($socket,$timeout); ($expire,$error,$dnresp,$timeout)=zone_def($zone,%dnsbl); $dotquad = valid127($dotquad); $dotquad = validIP($dotquad); $rv = job_died(%jobstatus,$directory); $rv = dbjob_chk(fault_config); dbjob_kill(fault_config,$graceperiod); dbjob_recover(fault_config); ($respip,$err,$blrsp,$exp,$zon)=unpack_contrib($record); ($which,$text)=lookupIP(%config,$dotquadIP,$sockpath,$is_network); $rv=list2NetAddr(@inlist,@NAobject); $rv = matchNetAddr($ip,@NAobject); $rv = BLcheck(%DNSBL,fault); $hashref = checkclct($DNSBL); $rv = dumpIPs($DNSBL, $allipsHASHptr); $rv = BLpreen(%DNSBL,fault); @err=mailcheck($fh,%MAILFILTER,%DNSBL,fault,@NAignor) $rv=zap_one($tool,$netaddr,$db,$verbose,$comment); zap_pair($tool,$netaddr,$pri,$sec,$debug,$verbose,$comment); $rv = is_GENERIC($conf->{GENERIC},@hostnames); block4zonedump($environment);METHODS $object = new Mail::Spamcannibal::ScriptSupport; $rv = $object->dns2rblz($line); $firstline = $object->rbldns_combined($type); $textline = $object->rbldns_compress($textline); $lastline = $object->rbldnst_done(); $lastline = $object->rbldns_done(); $last_combined = rbldns_address(); Requirements: · Perl · NetAddr::IP::Lite · Net::DNS::Codes · Net::DNS::ToolKit · Net::DNS::ToolKit::RR · Mail::SpamCannibal::GoodPrivacy · Mail::SpamCannibal::BDBclient


Mail::SpamCannibal::ScriptSupport Related Software