or download this
my $object = Win32::OLE->new('ClassID'); # this works correctly.
my $number = 1;
...
my $others;
my $returnValue = $object->GetData($number,$prices,$others);
# always fails with Win32::OLE(0.1701) error 0x80020005: "Type mismatc
+h" in argument 2