May I know the perl version of following shellscript

[Saifuddin_Bohra/HSS]

Hi,
      I am new to Perl. I have a follpwing shell script

if [ -n "`netstat -na|grep LISTEN |grep 1099`" ];
then
        exit 0
else
        exit 1
fi

I need the perl script for the same job.
and how to use this in another perl program
Any pointer ??

saifuddin


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]