Help for this page

Select Code to Download

Select or download this
```
my $logger = ${loggertyp}->new();
```

Select or download this

sub UNIVERSAL::AUTOLOAD {
  my ($pack, $meth) = $AUTOLOAD =~ /(.*)::(.*)/;
...
  die "$pack didn't define $meth" unless defined &$AUTOLOAD;
  goto &$AUTOLOAD;
}