そこで、Perl 経由で Agilent 34970A データ収集デバイス (DAQ) と通信しようとしています。次のように、USB-to-serial 経由で DAQ へのリンクを開くことができます。
$COM_port = Win32::SerialPort-> new('COM#') or die $!;
次のように、DAQ にコマンドを送信することもできます。
$COM_port->write("A command") or die $!;
しかし、DAQ からデータを受信できませんでした。これが私が試してきたコマンドです:
$COM_port->write("Read Command") or die $!;
@Output = $COM_port->read(4096) or die $!;
これは単に null 値を返します。
これは単純な答えを伴う単純な質問だと確信していますが、Win32::SerialPort のドキュメントはこれについてかなり不透明です。ありがとう!