Help for this page
use Sys::Syslog qw( :DEFAULT setlogsock );
BEGIN { ... openlog( 'IPScan', 'pid', 'local0' ); }