use Log::Dispatch::FileRotate;


my $file = Log::Dispatch::FileRotate->new( name      => 'file1',
                                           min_level => 'info',
                                           filename  => 'ree.log',
                                           mode      => 'append',
                                           size      => 10,
                                           max       => 5,
                                           );

$file->log( level => 'info', message => "Module Testing\n");