[cobalt-developers] perl script massadd.pl

[Henry Otten <hotten@xxxxxxxxxxxxxxxxxxxxxxxxxx>]

hello,
i am not a perl-programmer but i want to user the perlscript massadd.pl.

(I found the script at the cobalt KnowledgeBase )
when i start it the folloing error messages ar displayed:

syntax error at massadd.pl line 53 "= )"
syntax error at massadd.pl line 62 near "}"

the source locks like:

53                   while ($line = ) {
54                 ($fullname, $uid, $passwd, $f_name) = split(/[ ,]/,
$line);
55                  # chomp($f_name);
56                  # Not used since full name is in the file
57                  # $fullname = join(' ', $f_name, $l_name);
58                 print
user_add($uid,$fullname,$passwd,$quota,$shell,$site_name);
59                  print " ";
60                 print list_add_user("${site_name}-users",$uid);
61                  print "  ";
62                 }
63                  close(PASSIT);


Can anybody help, I need the script  to update my RAQ3 whith old users
from another Linux and Sun-Machine.


Thanks

Henry