Perl Script to lookup the Peering DB and auto-generate peer config