I just found where the problem is..
$error must be a passed by reference (\$error).
Thanks.
--- Em dom, 17/7/11, Téssio Fechine <precheca...@yahoo.com.br> escreveu:
> De: Téssio Fechine <precheca...@yahoo.com.br>
> Assunto: Win32API::Net UserAdd Problem
> Para: win32-vanilla@perl.org
> Data: Domingo, 17 de Julho de 2011, 19:26
> Hello,
> I'm using strawberry perl 5.12.3 on winxp sp3, and I have a
> problem :(
>
> I keep receiving this error message:
>
> "Use of uninitialized value in subroutine entry.."
>
> and this error code: "997"
>
> when I try to use Win32API::Net's UserAdd():
>
> UserAdd(
> '',
> 1,
> {
> comment
> => '',
> flags
> => (
>
> Win32API::Net::UF_SCRIPT() &
> Win32API::Net::UF_NORMAL_ACCOUNT()
> ),
> homeDir
> => '\\\\homeserver\\home\\' . $account,
> name
> => $account,
> password =>
> $password,
> passwordAge =>
> 0,
> priv
> => USER_PRIV_USER(),
> scriptPath =>
> '',
>
> },
> $error
> );
>
> Anyone can see what the problem is?
> Thanks..
>
>
