From: Joerg D. <jd...@us...> - 2004-10-04 21:18:19
|
Update of /cvsroot/ispman/ispman/bin In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5159/bin Modified Files: ispman.ldifupdate Log Message: removed warn flag added ispman libs preference Index: ispman.ldifupdate =================================================================== RCS file: /cvsroot/ispman/ispman/bin/ispman.ldifupdate,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- ispman.ldifupdate 3 Aug 2004 06:20:12 -0000 1.1 +++ ispman.ldifupdate 4 Oct 2004 21:18:07 -0000 1.2 @@ -1,4 +1,4 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl # Script to update LDIF data # Reads from one ldif file and writes to another ldif @@ -10,6 +10,12 @@ # according to current schema # For details see comments below +BEGIN { + use FindBin; + unshift @INC, + ( $FindBin::Bin, "$FindBin::Bin/../lib", "$FindBin::Bin/../conf" ); +} + use strict; use Getopt::Std; use Net::LDAP::LDIF; |