#!/camelbox/bin/perl
package main;

use strict;

use Gtk2 -init;

use Log::Log4perl;

# Init Logger from config file. 
Log::Log4perl::init_and_watch( 'log\root-logger.conf', 30 );
our $logger = Log::Log4perl->get_logger;

# Run main loop.
Gtk2->main;

##</code><code>##

package Foo;
$main::logger->debug("Here is a debug message in Foo.");

1;

##</code><code>##

package Bar;
$main::logger->debug("Here is a debug message in Bar.");

1;

##</code><code>##

package Baz;
$main::logger->debug("Here is a debug message in Baz.");

1;