4 use base 'Class::Accessor::Fast';
8 Catalyst::Log - Catalyst Log Class
16 Simple logging functionality for Catalyst.
22 Log debug informations.
26 sub debug { _format( 'debug', $_[1] ) }
30 Log error informations.
34 sub error { _format( 'error', $_[1] ) }
42 sub info { _format( 'info', $_[1] ) }
50 sub warn { _format( 'warn', $_[1] ) }
53 print STDERR '[' . localtime(time) . "] [catalyst] [$_[0]] $_[1]\n";
62 Sebastian Riedel, C<sri@cpan.org>
66 This program is free software, you can redistribute it and/or modify it under
67 the same terms as Perl itself.