Select Code to Download

    use Log::Log4perl qw(:easy);

...
          file    => ">>test.log" } );

    DEBUG("Debug this!");

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