perl script to create report on installed ports