#!/bin/perl use strict; use warnings; my $z = system("ps -ef | grep syslog | grep -v grep | wc -l"); use CGI; print CGI::header(); print ""; print "Test"; print ""; print "

Number of processes - $z

"; print ""; print "";