esmith::Logger - A filehandle abstraction around Syslog.
use esmith::Logger; tie *FH, 'esmith::Logger'; print FH "log message"; close FH;
you can do a function
use esmith::Logger; #we create a function because we want to write in log sub log2messages { my $message = shift; tie *FH, 'esmith::Logger'; print FH "$message"; close FH; }
and now in your code if you want to use it
log2messages("Your error message");