★三　【スクリプト改造工房 PART 8 】　★三

★三　【スクリプト� ..

136:お願いします
04/05/10 23:20
自分でファイルロック処理だけ書いてみたのですが、
112行目からを

sub outputdata{
# 現在の時間を取得
($sec,$min,$hour,$day,$mon,$year) = localtime(time);
$mon++;
$year += 1900;
$stmp = sprintf("%04d/%02d/%02d-%02d:%02d:%02d",$year,$mon,$day,$hour,$min,$sec);

open (DAT,">>$output");
&body;
flock(DAT,2);
print DAT "$body,$stmp\r\n";
flock(DAT,8);
close (DAT);
}

こうしてみました。これだけでいいのでしょうか？

次ページ

続きを表示

1を表示