NAME
    Log::Caller

SYNOPSIS
     log_debug "scanning new data...";

     [debug] scanning new data...  at t/00compile.t line 6

     log_warn "client %d not found!",$id;

     [warn] client 123 not found! at t/00compile.t line 8

DESCRIPTION
    log_$level EXPR LIST
        Take EXPR as a sprintf pattern and evaluate it with LIST if defined,
        print it to STDERR or the provided filehandle.

EXPORT
  Configuration
     use Log::Caller ":all";

     use Log::Caller qw[ log_debug log_warn ];

     use Log::Caller ":all" => { prefix => ' <prefixin>' };
 
     my $fh;
     BEGIN { open( $fh, ">", "outs.txt" ) or die "$@ $!" };
     use Log::Caller (
        "log_debug" => { prefix => 'prefix1>', fh => $fh },
        "log_warn" => { prefix => 'prefixDos::' },
        );

    The following functions are available for export:

    log_debug, log_info, log_error, log_warn, log_fatal,

    The :all tag is also available for importing all.

JUSTIFICATION
    There are scores of loggers out there, of varying usefulness, yet I
    still find myself and others constantly putting warn "blah" everywhere
    in the code.

    Why?

    a) because we're lazy, and it's the lowest effort form of logging output
    for debugging.

    b) the call stack is appended nicely

    c) because most loggers are full of bloat

    I wanted something that would work like warn but be filterable with
    proper log levels.

SEE ALSO
    Log::Fu - A configurable logger with caller context among other
    features.

AUTHOR
     sam@socialflow.com, sponsored by SocialFlow, Inc.

COPYRIGHT & LICENSE
    Copyright 2012, Sam Kaufman skaufman@cpan.org

    This library is free software; you can redistribute it and/or modify it
    under the same terms as Perl itself.