Perl router snmp to DNS

My Google fu is failing. Can anybody point me to a script that will create DNS entries from router snmp info? Jensen Tyler Sr Engineering Manager Fiberutilities Group, LLC