Perlについての質問箱 63箱目

[372 デフォルトの名無しさん 2016/07/24(日) 22:44:38.60 ID:IyAH6Xir]

このようにflockをネストするのは問題ありますか？

open(IN, "< $datafile");
flock(IN, 1);

open(IN2, "< $datafile2");
flock(IN2, 1);
close(IN2);

close(IN);