perl - Perl エラー: 未定義の値に対してメソッド 'Mangle' を呼び出せません

Question

次のようなステートメントがあるという点で、perlスクリプトを実行しようとしています-

# 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

しかし、このperlは次のようなエラーを出しています-

未定義の値に対してメソッド 'Mangle' を呼び出すことはできません。

だから、私は $user と $password_plain の値を出力しようとしましたが、これらの値をキャプチャすることができました。

このエラーに関する提案。