Win32::OLE(0.1601) error 0x80020005: "Type mismatch"
    in METHOD/PROPERTYGET "FlashLamp" argument 1 at CS1.pm line 199

##</code><code>##

    $cs1 = Win32::OLE->GetActiveObject("CS.CSInterface1") or die "Could not get interface CS1\n";
    ...
    my ($on, $off, $count) = $_; # contains args !!! SHOULD USE ARRAY HERE !!!
    $cs1->FlashLamp($on, $off, $count);

##</code><code>##

STDMETHODIMP CCSInterface1::FlashLamp(long OnDuration, long OffDuration, long FlashCount)
{
	return S_OK;
}