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....
An Englishman in New York
An American Werewolf in London
An American in Paris
The Innocents Abroad
An Idiot Abroad
Robinson Crusoe on Mars
A Connecticut_Yankee in King Arthur's Court
There and Back Again
Travels into Several Remote Nations of the World
Results (81 votes). Check out past polls.