tele-watch.pl
changeset 37 1b66d7a6cbdf
parent 36 74cd540d83b8
child 43 f38791e4991c
child 45 e66e9db8e83a
equal deleted inserted replaced
36:74cd540d83b8 37:1b66d7a6cbdf
    33 use File::Temp qw(tempfile);
    33 use File::Temp qw(tempfile);
    34 use POSIX qw(setsid);
    34 use POSIX qw(setsid);
    35 use File::Find;					# homepage hook
    35 use File::Find;					# homepage hook
    36 
    36 
    37 my $ME      = basename $0;
    37 my $ME      = basename $0;
    38 my $VERSION = "<VERSION>";
    38 my $VERSION = "0.4:<VERSION>";
    39 
    39 
    40 my $opt_block   = 1;
    40 my $opt_block   = 1;
    41 my $opt_daemon  = 1;
    41 my $opt_daemon  = 1;
    42 my $opt_pidfile = "/var/run/$ME.pid";
    42 my $opt_pidfile = "/var/run/$ME.pid";
    43 my $opt_kill    = 0;
    43 my $opt_kill    = 0;