08/10/17 14:01:42 b69SolAd
これに関してはググってしったことだけど、ファイルハンドルはグロブ型で渡さないといけないみたいで、
そこの部分を文字列を渡しちゃってるからおかしくなっちゃってるんじゃないかなって思う
それと、同じタイミングで重複して開くわけでもないのに別のファイルハンドル名を使う意味がわからない。
書き直したら動作したので書いておきます。
use strict;
for(1..3){
open(FH, "+<$_.txt");
flock(FH, 2);
seek(FH, 0, 0);
print FH "sss";
truncate(FH, tell(FH));
close(FH);
}