Win32::OLE Type for VB's "As Single"

[davemabe]

I am using a Win32 COM API that has a function that takes several parameters and assigns values to the variables. Here is the code in VB that I'm trying to convert to Perl.

Sub GetData(Number As Long, Prices() As Single, OtherDataPoints() As S
+ingle)

Here is the pseudo code I am trying to use to make it work:

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

Does anyone know what variant type I need to assign to $prices and $others that is equivalent to VB's "As Single"? I've tried several of the variant types found in the Win32::OLE::Variant perldoc, but so far I'm striking out.

Dave