summaryrefslogtreecommitdiff
path: root/import_members.pl
diff options
context:
space:
mode:
Diffstat (limited to 'import_members.pl')
-rwxr-xr-ximport_members.pl13
1 files changed, 12 insertions, 1 deletions
diff --git a/import_members.pl b/import_members.pl
index 9cf35b96..ef8b27cb 100755
--- a/import_members.pl
+++ b/import_members.pl
@@ -38,7 +38,16 @@ if($ENV{HTTP_HOST}){
exit;
}
-my $membersfile = 'users/members';
+my $membersfile = $ARGV[0];
+
+if (length($membersfile) < 2){
+
+ print "\nUsage: import_members.pl path/to/members\n\n";
+ print "You must supply the path to the members file. Default location\n";
+ print "is users/members. In this case do this:\n\n";
+ print " ./import_members.pl users/members\n\n";
+ exit;
+}
my @users = ();
@@ -84,6 +93,8 @@ while (<FH>) {
close(FH);
+print "\n\nParsing members file completed. Now trying to import user data.\n\n";
+
foreach (@users) {
$myUser = $member{$_};