Perl Error: Can' t call method 'Mangle' on an undefined value -

i trying execute perl script in have statement this-

# calculate password using pwdmangler $pwdmangler = win32::ole->new('pwdmangler.mangler'); unless($password = $pwdmangler->mangle($user , $password_plain)) {   print $log_file "error occured in pwdmangler\n";   exit (1); } # end unless 

but perl giving error this-

can't call method 'mangle' on undefined value.

so, tried print $user , $password_plain values , able capture these values.

any suggestion error.

from cpan: new() class method starts new instance of ole automation object. returns reference object or undef if creation failed.

you should check if pwdmangler.mangler proper program id.

p.s.: don't want dumb, sure pwdmangler should not pwdmanager?