ishii
2e3df16b39
2025/05/02 (金) 17:17:26
スクリプト作成者のishiiです。
スクリプト(G82)の結果をスクリプト(lazer)で処理するだけであれば
G82の whileループ内の
print OUT <・・・>; を push(@nc, <・・・>); 、
print OUT; を push(@nc, $_);
で置き換え、
G82の whileループを抜けてから
lazerの処理として
while(< IN >){ の代わりに
for (my $i = 0; $i <= $#nc; $i++){
$_ = $nc[$i];
としてみてはいかがでしょうか。
通報 ...
ishii様
早速返信頂きましてありがとうございます。
作成者様から改変の提案していただき、本当にありがとうございます!
早速頂いた文をそのまま置き換えましたがエラーでした。
Perlはよく理解できず悪戦苦闘しています。
arduinoを少し弄る程度の知識しかありませんが
>>print OUT <・・・>; を push(@nc, <・・・>); 、
>>print OUT; を push(@nc, $_);
の @nc の部分、
>>while(< IN >){ の代わりに
>>for (my $i = 0; $i <= $#nc; $i++){
>> $_ = $nc[$i];
の $#nc と $nc は宣言が必要になりますよね…
頂いた情報を無駄にしないようしっかり調べたいと思います。
ありがとうございました。