Check your system

Doesn't do much....

#!/usr/bin/perl -w

use strict;

foreach (`netstat -an`)
{
 print "Service: ", getservbyport($1,"tcp")||$1, " is listening\n"  if
+ (/\*\.(\d+).+LISTEN/);
};
[download]

Comment on Check your system Download Code

Replies are listed 'Best First'.
RE: Check your system by jjhorner (Hermit) on Jun 09, 2000 at 20:17 UTC
I may be called a heretic for this, but: `netstat -an \| grep LISTEN` [download] CAn be called from a cron job, to give an hourly port report. That is what I do. J. J. Horner Linux, Perl, Apache, Stronghold, Unix jhorner@knoxlug.org http://www.knoxlug.org/	[reply] [d/l]