
Appendix E. Scripts and configuration files 369
AFS to Kerberos/LDAP group migration
Example E-6 provides a script to migrate groups from AFS to Kerberos/LDAP.
Example: E-6 Script migrate_afs_groups.pl to migrate groups: AFS to Kerberos/LDAP
#!/usr/bin/perl
##
## Copyright 2005 IBM Corporation. All rights reserved. This script
## is provided solely as an example for migration planning purposes;
## no warranty, expressed or implied, is provided for this utility.
##
##
## Usage: perl migrate_afs_groups.pl --file <file-name>
##
use Getopt::Long qw(GetOptions);
my $fileName = "";
my $admin_user = "admusr";
GetOptions ( 'file=s' => \$fileName);
die "Usage: migrate_afs_groups.pl ...