1001コメント343KB

【Perl】初心者コーナー Part13

レス数が950を超えています。1000を超えると書き込みができなくなります。

0950nobodyさん

02/07/18 03:19ID:???

>>all

これ完璧だと思うけど、違うの？

open(OUT, "+< outfile.txt");
flock(OUT, 2);
truncate(OUT, 0);
seek(OUT, 0, 0);
print OUT "........";
close(OUT);

レス数が950を超えています。1000を超えると書き込みができなくなります。