in reply to Win32::OLE Type for VB's "As Single"
I would look into using variants.
my $number = 1;
my $var_number = Variant(VT_R4, $number);
Shame on me not reading the OP properly!!
my $number = Variant(VT_I4, 1);;
my $prices = Variant(VT_R4 | VT_ARRAY, [1,10], 1); # Index 0 .. 9
my $others = Variant(VT_R4 | VT_ARRAY, [1,5], 1); # Index 0 .. 4
my $returnValue = $object->GetData($number,$prices,$others);
Variant(VT_R4 | VT_ARRAY | VT_BYREF, [1,5], 1);
I have no possibility to test this myself, so please regard this as the shot in the dark it is. But since you don't seem to have reached a working solution, I offer you this straw....
The spec is broken
The doc is broken
The duck is broken
My keyboard is broken
My chair is broken
<Module name> is broken
perl is broken
The coffee machine is broken
My internet connection is broken
The world is stone
It's written in VB (Very Broken)
I wrote it using only a hammer
I'm an idiot
They just keep finding better idiots
It's not a bug, it's a feature
Results (253 votes). Check out past polls.