Help for this page

Select Code to Download


  1. or download this
    Time::HiRes::sleep(-0.13635): negative time not invented yet at /usr/l
+ocal/lib/perl5/site_perl/5.8.2/File/Tail.pm line 529.
  2. or download this
    #!/usr/local/bin/perl
##
...
        print FIFO "NEW|TODAY|NOW|\"\"|$PagerID|$Message|$Status\n";
close(FIFO);
}