Help for this page

Select Code to Download


  1. or download this
    my (%master, %slave); 
    
    ...
     
    print "Running local find for master \n"; 
    find( sub { -f && $master{$_} = $File::Find::name }, $confDir);
    
  2. or download this
    Can't modify logical and (&&) in scalar assignment at AuditConf.pl lin
    +e 16, near "$File::Find::name }" 
    Execution of AuditConf.pl aborted due to compilation errors.