package testPackage;

use Log::Log4perl qw(get_logger);
sub foo {
    $logger = Log::Log4perl->get_logger("");  # IF I PUT testLog IN THE QUOTES THEN I'M GETTING THE blah IN THE CALLERS LOGS FILE
    $logger->info("blah");
}
1;