Log::any adapter to log through log::dispatch
use Log::Any::Adapter;
Log::Any::Adapter->set('Dispatch', outputs => [[ ... ]]);
my $dispatcher = Log::Dispatch->new( ... );
Log::Any::Adapter->set('Dispatch', dispatcher => $dispatcher);
This Log::Any adapter uses Log::Dispatch for logging.
You may either pass parameters (like outputs) to be passed to \*(C`Log::Dispatch->new\*(C', or pass a \*(C`Log::Dispatch\*(C' object directly in the dispatcher parameter.
Log::Any::Adapter, Log::Any, Log::Dispatch
Jonathan Swartz
Copyright (C) 2007 Jonathan Swartz, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.