If you like to be able to log to different targets (screen/file/syslog/remote machine/etc...) there is a nice module on CPAN called Log::Dispatch that I've been playing with recently.
It provides a consistent OO interface to logging to all kinds of different targets
Here is the synopsis:

use Log::Dispatch;

my $dispatcher = Log::Dispatch->new;

$dispatcher->add( Log::Dispatch::File->new( name => 'file1',
                                            min_level => 'debug',
                                            filename => 'logfile' ) );

$dispatcher->log( level => 'info',
                  message => 'Blah, blah' );

my $sub = sub { my %p = @_;  return reverse $p{message}; };
my $reversing_dispatcher = Log::Dispatch->new( callbacks => $sub );
[download]

Hope that helps!

--Glenn