Print 'Cannot find server $server, valid choices are: ' $found_server = 1 if (lc($name) eq lc($server)) %items_write = ('_test' => '0') ĭie 'No server specified' unless ($server) ĭie 'No read items specified' unless 'No write items specified' unless (%items_write) Use Win32::OLE::OPC qw(GetOPCServers $OPCCache $OPCDevice) # It is assumed that you are using the FactorySoft OPC automation DLL +which # and the server they are in for this to do anything.

You will have to supply the OPC path names of some + items # This example uses groups, group, items and item objects to get and s +et data # Put the path to your perl interpreter above if you are using bash as + your # This program is free software you can redistribute it and/or modify + it # Copyright (c) 1999-2001 by Martin Tomes. Thanks and let me know what other info I can provide, Justin The 2nd code section is the part of the perl module referencing Write. Also, the write function is used near the end of the first code section which is my entire code. I'd greatly appreciate any help or direction on how to write a tag value. In addition to the code I've supplied, I've also tried just passing a '0' value directly (which is all I'm trying to write actually to a single boolean tag) and get the same error. I've also had limited results searching for perl OPC information, besides the perl module's help file. I looked over the perl module code and I'm not sure where a formatting or syntax issue could be happening.

'0x80070057: The parameter is incorrect'. Adapting the perl code below from Activestate to my local Kepware OPC server (and using the OPC Automation Wrapper), I am able to read an opc tag value, but writing a value via the OPC.pm Write function leaves the error Hello, sorry in advance if this is not posted in the correct place or if it's not formatted correctly.

Factorysoft opc client toolkit