1. added $actiondata to filter line to allow per action data such as no of hops

[spider.git] / perl / import_users.pl

diff --git a/perl/import_users.pl b/perl/import_users.pl
index 3111e064d8cd221b513d35ef599cf02cf3aa8791..d4cecbfded37907c933edae41524c301869dee8f 100755 (executable)
--- a/perl/import_users.pl
+++ b/perl/import_users.pl
@@ -23,9 +23,8 @@ use DXUser;
 use Carp;
 
 $userfn = $ARGV[0] if @ARGV;
-unless ($userfn) {
-       croak "need a filename";
-}
+croak "need a filename" unless $userfn;
+croak "$userfn.asc doesn't exist" unless -e "$userfn.asc";
 
 DXUser->init($userfn, 1);