Help for this page

Select Code to Download

Select or download this

  my $watchdog = "./watchdog.@{[time]}.$$";
  open WATCHDOG, ">$watchdog" or die "Cannot open $watchdog for output
+: $!\n";
  print WATCHDOG "This file may safely be deleted\n";
...

  do_logging();
  unlink $watchdog;