Help for this page

Select Code to Download


  1. or download this
    $log->info("Data directory: %s", $options->{'dir'});
  2. or download this
    my $spr = sub { my $fmt = shift;  return sprintf $fmt, @_; };
  3. or download this
    my $conf = qq!
    log4perl.rootLogger        = TRACE, DBAppndr
...

!;
    Log::Log4perl::init( \$conf );