Perl scripts to process ibnetdiscover to extract network topology info - View it on GitHub