I noticed that the syslog module on default uses udp port 514 when used as below. I am running the syslog-ng deamon
on a tcp port 4477 which is why I was not getting the logs.
 
==============
use Sys::Syslog;
 
openlog('Test', 'pid', 'user');
$n=$ARGV[0];
syslog('err', 'Logging a Test Message %d', $n);
==============
How do I specify it to use a tcp port to use instead?
 
Thanks
Ravi