--- nfo/perl/libs/Log/Dispatch/Tangram.pm 2002/10/10 03:44:42 1.1 +++ nfo/perl/libs/Log/Dispatch/Tangram.pm 2002/10/11 04:48:05 1.2 @@ -1,8 +1,11 @@ ################################# # -# $Id: Tangram.pm,v 1.1 2002/10/10 03:44:42 cvsjoko Exp $ +# $Id: Tangram.pm,v 1.2 2002/10/11 04:48:05 cvsjoko Exp $ # # $Log: Tangram.pm,v $ +# Revision 1.2 2002/10/11 04:48:05 cvsjoko +# + added strictness (use strict, use warnings) +# # Revision 1.1 2002/10/10 03:44:42 cvsjoko # + new # @@ -12,6 +15,7 @@ package Log::Dispatch::Tangram; use strict; +use warnings; use Log::Dispatch::Output; @@ -20,7 +24,7 @@ use vars qw[ $VERSION ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.1 $ =~ /: (\d+)\.(\d+)/; +$VERSION = sprintf "%d.%02d", q$Revision: 1.2 $ =~ /: (\d+)\.(\d+)/; use POSIX qw(strftime);