Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
(simple|short|script) logging  by hiseldl (Priest) on Dec 04,
2006 at 19:53 UTC ( #587726=snippet: print w/ replies, xml )
Need Help??   Have you ever written a script and needed a quick
way to log-to-a-file. I've done this over and over, in the last
several years that I've been writing perl. It's a simple and
short way to log things to a file. For example:  # start the
logfile slog "$logfile"; slog
"=======================================START="; slog "=
".(scalar localtime); # do some stuff noslog; # send to another
logfile slog "$another_logfile"; slog
"=======================================START="; slog "=
".(scalar localtime); # do some stuff noslog;  It has
limitations, such as, only one log file can be written at a
time. It uses IO::File, but that shouldn't be too much of a
limitation, anymore. It also puts $_slogfh in the main::
namespace. Since I mostly use this for quick testing-type
scripts