Perl program to list listening ports
 

Hi everybody,

I am writing a server monitoring script and I would like to list the listening ports on my machine. The program is written in Perl and it will run on (mostly) Redhat systems. Is there a better way to do it than grab the output of netstat?

Thanks,
doza

Unless there's something in a /proc file somewhere, short of recurvesively going through 60 some odd thousand ports ( which is a bad idea on several levels ), not really.