Help for this page

Select Code to Download


  1. or download this
    sub log_it
{
...
  my $timestamp = time;
  print $fh $timestamp . ": " . $message . "\n";
}
  2. or download this
    {
  package Logger;
...
my $logger = Logger->new(handle => $fh);
$logger->log_it("Hello");
$logger->log_it("World");
  3. or download this
    {
  package Logger;
...
my $logger = Logger->new(handle => $fh);
$logger->("Hello");
$logger->("World");