NAME

Log::Simple - Basic runtime logger

SYNOPSIS

use Log::Simple ( 6 );

set_logger( 2, sub { print join ( "", @_, "\n") } );

set_logger( 3, sub { print "$_\n" for @_ } );

logger( 1, "hello" );

logger( 7, "this", $message, "never appears" );

logger( 2, "this", "message", "will", "be", "printed", "without", "space" );

logger( 3, "this", "message", "will", "be", "printed", "a", "word", "by", "line" );

package	My::Example;

use	Log::Simple ( 7 );

logger( 7, "this message appears" );

set_local_logger( 3, sub { print join ( "", @_, "too\n") } );

logger( 2, "this", "message", "will", "be", "printed", "without", "space" );

logger( 3, "this", "message", "will", "be", "printed", "without", "space" );

DESCRIPTION

External Functions

logger( $level, @messages )

log informations

set_logger ( $level , $callback )

Install an generic Logger.

set_local_logger ( $level , $callback )

install an local Logger.

Internal Functions

std_logger( @messages )

log information to STDERR

time_track( )

callback which permit to timestamp messages.

import

Set the Logging/Debug level and export external functions

BUGS

  • I don't know ...

TO DO

  • Better documentation

  • Other functions

  • Add tests ...

COPYRIGHT, LICENCE

Copyright (c) 1997-2006 Samuel MOUNIEE

This file is part of Log::Simple.

Log::Simple is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; version 2 of the License.

Log::Simple is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with Log::Simple ; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA

AUTHOR

Samuel Mouniée aka Moun's, mouns@cpan.org

MAIN REPOSITORY

http://www.mouns.net/devel/CPAN/

SEE ALSO

perl(1).