Help for this page

Select Code to Download


  1. or download this
    package Foo;
    
    ...
    sub foo { $logger->warn("Fooing") }
    
    1;
    
  2. or download this
    package Bar;
    
    ...
    }
    
    1;
    
  3. or download this
    use Foo;
    use Bar;
    ...
    
    $f->foo;
    $b->bar;
    
  4. or download this
    2006/05/09 11:53:01 WARN> test_log_strategies.pl:8 Foo::new - Creating
    + Foo
    2006/05/09 11:53:01 WARN> test_log_strategies.pl:19 Bar::new - Creatin
    +g Bar
    2006/05/09 11:53:01 WARN> test_log_strategies.pl:10 Foo::foo - Fooing
    2006/05/09 11:53:01 WARN> test_log_strategies.pl:21 Bar::bar - Baring