From: "Doherty, Steve" <[EMAIL PROTECTED]>
> Hello Perl NT Gurus, I am new to Perl for NT. I am attempting to
> modify Dave Roth's great AddUser.pl script to do 2 things. 1: to
> accept input from a file instead of the command line and 2: Create 2
> subdirectories called "outlook" and "personal". I have been attempting
> to do this for a week now with no success. Has anyone done this or
> does anyone have code examples that can point me in the right
> direction?
>
> Steve Doherty
It would help if you told us how did you fail and what did you try.
To read the user creation info should be rather easy.
I do not have the script at hand but you should simply create a
function out of the operational portion of the script (everything after
the "use" statements and @ARGV processing.), read the file,
parse the lines and call the procedure.
To create subdirectories should be even easier.
See
perldoc -f mkdir
Just remember that it is only able to create one directory at a time,
not whole path. So if you need to create c:\foo\bar and c:\foo
doesn't exist yet either you have to call mkdir() twice.
Jenda
=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain
I can't find it.
--- me
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
