Darren Wanner wrote:

> Simple add user script:
> 
> #!/usr/bin/perl
> 
> open(FILE,"users.log");
> @users=<FILE>;
> foreach $users (@users) {
> `useradd -g 201 -d /userhome/$users -m $users`;
> }
> print "done.\n";

change:

@users = <FILE>;

to:

chop(@users = <FILE>);

and try again.

david

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to