Andy Baugh 3 năm trước cách đây
mục cha
commit
40ed9c27a5
1 tập tin đã thay đổi với 1 bổ sung0 xóa
  1. 1 0
      ldapscanner

+ 1 - 0
ldapscanner

@@ -7,6 +7,7 @@ use Config::Tiny  ();
 use File::Slurper ();
 use Net::LDAP     ();
 
+die "No config file!" if !-f 'ldapscanner.cfg';
 my $cfg     = Config::Tiny->read('ldapscanner.cfg');
 my @servers = split( ',', $cfg->{'server'}{'hosts'} );
 my $proto   = $cfg->{'server'}{'ldaps'} ? 'ldaps' : 'ldap';