#!/usr/bin/perl
# log4perl-easy3.pl

use strict;
use warnings;

use Log::Log4perl qw(:easy);

Log::Log4perl->easy_init(
    {
    file  => ">> error_log",
    level => $ERROR,
    },

    {
    file  => "STDERR",
    level => $DEBUG,
    }
    );

ERROR( "I've got something to say!" );

DEBUG( "Hey! What's going on in there?" );