config.pm
branchmissing-push
changeset 47 e8f30ec7d962
parent 28 714d4a0ea0bc
child 79 d114cce9f03f
equal deleted inserted replaced
46:0b38d2f1cf49 47:e8f30ec7d962
     1 package config;
     1 package config;
     2 
     2 
     3 use Sys::Hostname;
     3 use Sys::Hostname;
     4 my $NODENAME = (split /\./, hostname)[0];
     4 my $NODENAME = (split /\./, hostname)[0];
     5 
     5 
     6 @mailto      = qw(root@localhost);
     6 @mailto      = "root";
     7 $logfile     = "/root/LOG.$NODENAME";
     7 $logfile     = "/root/LOG.$NODENAME";
     8 
     8 
     9 # @notify_dirs = qw(/etc);
     9 # @notify_dirs = qw(/etc);
    10 
    10 
    11 1;
    11 1;