ファイルを書き換える際、
truncate(FL, 0);
で先にクリアしてから書き込むか、
書き込んでから
truncate(FL, tell);
で後ろを削るかで悩んでいます。
どちらが正しいとかではなくて信頼性や
こちらの方が一般的だとかあるのでしょうか？

if(open(FL, ">>$file")){
flock(FL,2);

seek(FL, 0, 0);
print FL "あいうえお";
truncate(FL, tell);

flock(FL,8);
close(FL);

}

if(open(FL, ">>$file")){
flock(FL,2);

truncate(FL, 0);
seek(FL, 0, 0);
print FL "あいうえお";

flock(FL,8);
close(FL);
}