Help for this page
$tdc = Win32::OLE->new('TDapiole80.TDconnection'); print Win32::OLE->LastError();
Win32::OLE(0.1709) error 0x80040154: "Class not registered"