#!/usr/bin/perl -w
use Log::Dispatch::FileRotate;


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

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