hi
I think you might find Log module helpful for that kind of tasks,
loggers usually have messeges level such as qw/trace debug info warn error/
I find Log::Log4perl a very good log PM but sometime overkill.
another nice trick that might interest you is to keep the constants of your
program (such as log level , log files names and so on. . . ) in outer file
such as configuration file or another pkg.
Enjoy :-) Sagiv
On Thursday 22/3/2007 17:53, ברונפמן ולדימיר wrote:
> Well, I very appreciate for answers – they really helpful and high-skilled.
> I am ashamed for but reason is if($DEBUG) {print STDOUT @_, "\n"} where
> $DEBUG is never initialized. Well, stupid things happens too… :)
>
> Vladimir M. Bronfman
> Development Department
> LADPC Inc
> Israel
>
>
>
>
> _______________________________________________
> Perl mailing list
> [email protected]
> http://perl.org.il/mailman/listinfo/perl
--
_______________________________________________
Perl mailing list
[email protected]
http://perl.org.il/mailman/listinfo/perl
