use strict;
my $rc=system("ps -ef | grep [i]netd");
if ($rc) {print "inetd seems to have gone the way of the dodo.\n"};