#!/usr/bin/perl use strict; use warnings; use Data::Dumper; use Log::Handler; my $log = Log::Handler->new(); $log->config(config => "logger1.conf"); $log->warning("foo"); $log->info("foo"); print "--------------------------------------\n"; $log->reload(config => "logger2.conf") or die $log->errstr; $log->warning("bar"); $log->info("bar");