Perl script to install the Perl binaries without the Makefile. Platform

independent.
run: perl install-bin

directory/perldap/install-bin

@@ -0,0 +1,59 @@
+#!/usr/bin/perl -w
+#############################################################################
+#
+# The contents of this file are subject to the Mozilla Public License
+# Version 1.0 (the "License"); you may not use this file except in
+# compliance with the License. You may obtain a copy of the License at
+# http://www.mozilla.org/MPL/
+#
+# Software distributed under the License is distributed on an "AS IS"
+# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
+# License for the specific language governing rights and limitations
+# under the License.
+#
+# The Original Code is PerLDAP. The Initial Developer of the Original
+# Code is Netscape Communications Corp. and Clayton Donley. Portions
+# created by Netscape are Copyright (C) Netscape Communications
+# Corp., portions created by Clayton Donley are Copyright (C) Clayton
+# Donley. All Rights Reserved.
+#
+# Contributor(s):
+#
+# DESCRIPTION
+#    Perl Script to Install PerLDAP Binaries without a Makefile.
+#    For use with the binary distribution of PerLDAP.
+#
+#############################################################################
+
+use File::Path;
+use File::Copy;
+use Config;
+
+print "\n##############################################\n";
+print "#       Installing Netscape PerLDAP v1.0     #\n";
+print "##############################################\n\n";
+
+$ARCH_LIB = $Config{'sitearchexp'} . "/auto/Mozilla/LDAP/API";
+$PERL_LIB = $Config{'sitelibexp'};
+
+print "Creating Directory '$ARCH_LIB'...\n";
+File::Path::mkpath "$ARCH_LIB";
+print "Creating Directory '$PERL_LIB/Mozilla/LDAP'...\n";
+File::Path::mkpath "$PERL_LIB/Mozilla/LDAP";
+
+print "Copying Architecture Dependent Files...\n";
+
+foreach $file (glob "blib/arch/auto/Mozilla/LDAP/API/*")
+{
+   copy($file,"$ARCH_LIB");
+}
+
+print "Copying Module Components...\n";
+
+foreach $file (glob "blib/lib/Mozilla/LDAP/*")
+{
+   copy($file,"$PERL_LIB/Mozilla/LDAP");
+}
+
+print "Finished!\n\n";
+exit 0;