Select Code to Download

package MyPackage;
use Log::Log4perl qw(:easy);
sub method {
    DEBUG "Doing something!";
}

use Log::Log4perl qw(:levels);
Log::Log4perl->init("/home/mycode/log4perl-conf.txt");
my $logger = Log::Log4perl->get_logger;
$logger->level($DEBUG);