use Perl

Next, I decided to work on a Log module (even though another one probably exists) because I figured it would be good practice for writing modules for CPAN, even if I never send it there. The intended function for it is to import the function log:

log('text to log');
log(lognumber, 'text to log');
log({ lognumber => "filename" });

where the first is the simplest usage, the second is usage with switchable log files, and the third is the syntax for designating the filename for a switchable log file.

The part where it's a total ripoff is that I want the use Log; part of the module to switch all the log() functions on and off, as in

use Log qw('on');
use Log qw('off');

which is pretty much just a batch of functionality I've been implementing myself, with a variable set to 0 or 1 and a print statement wrapped inside an if and an open statement wrapped inside the same if. I just figured it would save me typing.

I toyed briefly with the notion of looking around, because I'm sure that CPAN has a much better logging module somewhere, but like I said, this is practice, and what the hell. Even if I'm the only person who ever uses it, it'll help me on little things that only I would ever see.